fraport/fradrive-old
Archived
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Minor comments

Browse Source
This commit is contained in:
SJost 2018-03-07 13:01:23 +01:00
parent c8c968a7e4
commit 27507906d1
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/Handler/Utils/Form.hs
View File

@ -241,7 +241,8 @@ sheetTypeAFormReq d (Just (Normal p)) =
utcTimeField :: (Monad m, RenderMessage (HandlerSite m) FormMessage) => Field m UTCTime utcTimeField :: (Monad m, RenderMessage (HandlerSite m) FormMessage) => Field m UTCTime
-- StackOverflow: dayToUTC <$> (areq (jqueryDayField def {...}) settings Nothing) -- StackOverflow: dayToUTC <$> (areq (jqueryDayField def {...}) settings Nothing)
utcTimeField = Field -- TODO: Verify whether this is UTC or local time from Browser
utcTimeField = Field
{ fieldParse = parseHelper $ readTime { fieldParse = parseHelper $ readTime
, fieldView = \theId name attrs val isReq -> , fieldView = \theId name attrs val isReq ->
[whamlet| [whamlet|