nek0/eidolon
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

little cleanup

Browse source
This commit is contained in:
nek0 2015-08-28 13:35:08 +02:00
parent 32136408c0
commit bc63a44883
2 changed files with 0 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
Handler/Commons.hs
View file

@ -17,7 +17,6 @@
module Handler.Commons where module Handler.Commons where
import Import import Import
import Yesod
import Data.String import Data.String
loginIsAdmin :: IsString t => Handler (Either (t, Route App) ()) loginIsAdmin :: IsString t => Handler (Either (t, Route App) ())

1
Handler/Signup.hs
View file

@ -29,7 +29,6 @@ getSignupR = do
case block of case block of
False -> do False -> do
formLayout $ do formLayout $ do
master <- getYesod
setTitle "Eidolon :: Signup" setTitle "Eidolon :: Signup"
$(widgetFile "signup") $(widgetFile "signup")
True -> do True -> do