используйте BootstrapHorizontalForm в yesod

Я намерен использовать BootstrapHorizontalForm, используйте, например, этот руководство, мой код:

форма

churchForm :: Maybe Church -> AForm Handler (Church,Maybe FileInfo)
churchForm mc = (,) <$>
(Church
 <$> areq textField (bfs MsgName) (churchName <$> mc)
 <*  bootstrapSubmit (BootstrapSubmit MsgCreateAction "btn-default" [("attribute-name","attribute-value")])

метод ПОЛУЧИТЬ

getChurchNewR :: Handler Html
getChurchNewR = do
(widget, enctype) <- generateFormPost $
                   renderBootstrap3 (BootstrapHorizontalForm (ColSm 0) (ColSm 4) (ColSm 0) (ColSm 6))
                   (churchForm Nothing)
  defaultLayout $ do
    msgAction = MsgCreateAction
    actionR = ChurchNewR
    mPath = Nothing
$(widgetFile "church/church")

но есть эта ошибка:

Handler/Church.hs:63:67: Не входит в область действия: конструктор данных «ColSm»

спасибо за помощь


haskell yesod yesod-forms
person oriaj    schedule 14.04.2015    source источник

Ответы (1)


arrow_upward
0
arrow_downward

Это похоже на отсутствующий импорт. Убедитесь, что вы действительно импортируете CpmSm вверху файла.

Этот импорт может иметь форму:

import Yesod.Form.Bootstrap3 (BootstrapGridOptions (ColSm))

or 

import Yesod.Form.Bootstrap3 (BootstrapGridOptions (..))

или даже

import Yesod.Form.Bootstrap3

Если вам это не кажется знакомым, вы можете взглянуть на главу о модулях из Изучите Haskell самостоятельно. чтобы узнать больше об импорте.

person madjar    schedule 15.04.2015
comment
спасибо за ответ и ссылку, проблема была в импорте, - person oriaj; 17.04.2015