-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathImport.hs
25 lines (23 loc) · 1.03 KB
/
Import.hs
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
module Import
( module Import
) where
import ClassyPrelude as Import hiding (parseTime)
import Yesod as Import hiding (Route (..))
import Yesod.Auth as Import
import Text.Julius as Import (rawJS)
import Foundation as Import
import Model as Import
import Settings as Import
import Settings.Development as Import
import Settings.StaticFiles as Import
import Utils as Import
myFormSettings :: MyForm App AppMessage res
myFormSettings = MyForm
{ mfTitle = MsgUnknown
, mfEnctype = UrlEncoded
, mfInfoMsg = (MsgFormOneError, MsgFormNErrors, MsgFormSuccess)
, mfRoute = HomeR
, mfFields = [whamlet|Unitialized form! This should not happen.|]
, mfActions = [whamlet|<input type=submit>|]
, mfResult = error "Unitialized result for MyForm"
}