diff --git a/test/Handler/HomeSpec.hs b/test/Handler/HomeSpec.hs index 2b6abbe..e0102f6 100755 --- a/test/Handler/HomeSpec.hs +++ b/test/Handler/HomeSpec.hs @@ -12,7 +12,7 @@ spec = withApp $ do request $ do setMethod "POST" setUrl HomeR - addNonce + addToken fileByLabel "Choose a file" "test/Spec.hs" "text/plain" -- talk about self-reference byLabel "What's on the file?" "Some Content" diff --git a/test/TestImport.hs b/test/TestImport.hs index 75d8741..0cb65c7 100644 --- a/test/TestImport.hs +++ b/test/TestImport.hs @@ -5,7 +5,7 @@ module TestImport import Application (makeFoundation) import ClassyPrelude as X hiding (Handler) -import Database.Persist as X hiding (get) +import Database.Persist as X hiding (get, delete, deleteBy) import Database.Persist.Sql (SqlPersistM, runSqlPersistMPool) import Foundation as X import Model as X