2

我想将Field (HandlerT site IO) DayofjqueryDayField转换为Field (HandlerT site IO) UTCTimewithdiffTime 0因为我使用 mongodb 作为我的数据库，而 Day 只在存储中生成一个整数值，没有实际的日期格式。

即我的表单代码中有这样的内容：

    <*> areq (dayToUTC $ (jqueryDayField def
        { jdsChangeYear = True -- give a year dropdown
        , jdsChangeMonth = True
        , jdsYearRange = "2000:"
        })) (fieldSettingsLabel MsgNewEntryDate) Nothing

在哪里dayToUTC进行转换。还是我应该使用不同的方法？

到目前为止，我的解决方案只是拥有一个自定义jqueryUTCField :: (RenderMessage site FormMessage, YesodJquery site) => JqueryDaySettings -> Field (HandlerT site IO) UTCTime功能，但我觉得这不一定是最好的解决方案。

4

1 回答 1

3

Something like the following should work:

dayToUTC <$> (areq (jqueryDayField def {...}) settings Nothing)
于 2013-07-21T09:20:43.283 回答