使用jqueryDayField进行UTCTime

时间:2013-07-19 22:01:39

标签: haskell yesod

我想将Field (HandlerT site IO) Day的{​​{1}}转换为jqueryDayField Field (HandlerT site IO) UTCTime,因为我使用mongodb作为我的数据库而Day只生成一个整数值在商店里没有实际的日期格式。

即。我的表单代码中有类似的内容:

diffTime 0

<*> areq (dayToUTC $ (jqueryDayField def { jdsChangeYear = True -- give a year dropdown , jdsChangeMonth = True , jdsYearRange = "2000:" })) (fieldSettingsLabel MsgNewEntryDate) Nothing 将进行转换。或者我应该使用不同的方法吗?

<小时/> 到目前为止,我的解决方案只是定制dayToUTC功能,但我觉得这不一定是最好的解决方案。

1 个答案:

答案 0 :(得分:2)

以下内容应该有效:

dayToUTC <$> (areq (jqueryDayField def {...}) settings Nothing)