Skip to content

Commit

Permalink
Code review fixes
Browse files Browse the repository at this point in the history
  • Loading branch information
amitaibu committed Sep 7, 2016
1 parent d610310 commit 43079ad
Show file tree
Hide file tree
Showing 2 changed files with 4 additions and 3 deletions.
2 changes: 1 addition & 1 deletion Foundation.hs
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,7 @@ import Database.Persist.Sql (ConnectionPool, runSqlPool)
import Text.Hamlet (hamletFile)
import Text.Jasmine (minifym)
import Yesod.Auth.Dummy
-- ^ Used only when in development mode.
-- ^ Used only when in "auth-dummy-login" setting is enabled.
import Yesod.Auth.OpenId (authOpenId, IdentifierType (Claimed))
import Yesod.Default.Util (addStaticContentExternal)
import Yesod.Core.Types (Logger)
Expand Down
5 changes: 3 additions & 2 deletions test/TestImport.hs
Original file line number Diff line number Diff line change
Expand Up @@ -57,8 +57,9 @@ getTables = do

return $ map unSingle tables

-- | Authenticate as a user. This relies on the `development: true` flag being set in test-settings.yaml,
-- which enables dummy authentication in Foundation.hs
-- | Authenticate as a user. This relies on the `auth-dummy-login: true` flag
-- being set in test-settings.yaml, which enables dummy authentication in
-- Foundation.hs
authenticateAs :: Entity User -> YesodExample App ()
authenticateAs (Entity _ u) = do
request $ do
Expand Down

0 comments on commit 43079ad

Please sign in to comment.