agrafix / spock-digestive

Digestive functors support for Haskell Web-Framework Spock

Spock-digestive

Intro

Hackage: Spock-digestive Stackage: Spock-digestive

Digestive functors support for Spock

Install

• Using cabal: cabal install Spock-digestive
• Using Stack: stack install Spock-digestive
• From Source (cabal): git clone https://github.com/agrafix/Spock-digestive.git && cd Spock-digestive && cabal install
• From Source (stack): git clone https://github.com/agrafix/Spock-digestive.git && cd Spock-digestive && stack build

Misc

Supported GHC Versions

• 7.10.2

License

Released under the MIT license. (c) 2014 - 2016 Alexander Thiemann [email protected]

spock-digestive's Issues

Not working in GHC 8.x, yet?

|| Failed to load interface for ‘Web.Spock.Digestive’
|| There are files missing in the ‘Spock-digestive-0.3.0.0’ package,

Validation is not working

I have a very simple form (digestive-bootstrap) with some validation:

newUserForm :: Monad m => F.Form H.Html m NewUserRequest
newUserForm = NewUserRequest
              <$> "username" F..: nonEmptyText
              <*> (fst <$> newPasswordForm)
              <*> "is_admin" F..: F.bool (Just False)
   where
    nonEmptyText =
      F.check "Cannot be empty" (not . T.null) $ F.text Nothing
    newPasswordForm = F.check "Passwords don't match" (Prelude.uncurry (==)) $ (,)
      <$> "password" F..: F.text Nothing
      <*> "password2" F..: F.text Nothing

newUserFormSpec :: F.FormMeta
newUserFormSpec =
  F.FormMeta
    { F.fm_method = POST
    , F.fm_target = "/newUser"
    , F.fm_elements =
        [ F.FormElement "username" (Just "Username") F.InputText
        , F.FormElement "password" (Just "Password") F.InputPassword
        , F.FormElement "password2" (Just "Confirm password") F.InputPassword
        , F.FormElement "is_admin" (Just "Admin?") F.InputCheckbox
        ]
    , F.fm_submitText = "New User"
    }

then I use Spock-digestive to run this form

do
  let formView = F.renderForm newUserFormSpec
  f <- F.runForm "newUserForm" newUserForm
  case f of
    (view, Nothing) -> site $ formView view
    (view, Just nuReq) -> ...

When I type different passwords, form is failed, but no errors shown. nonEmptyText validator works though.

Versions: Spock-digestive-0.2.0.0, digestive-bootstrap-0.1.0.1, digestive-functors-0.8.0.1

Travis build broken?

The main page says the Travis build is broken as of a month ago. Maybe restart it?