haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Exposing RawParam

Browse Source
This commit is contained in:
Michael Snoyman 2009-10-07 17:49:29 +02:00
parent 1a997621e8
commit 9f399d0eea
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Web/Restful/Request.hs
View File

@ -23,6 +23,7 @@ module Web.Restful.Request
, ParamType
, ParamName
, ParamValue
, RawParam (..)
-- * RawRequest
, RawRequest (..)
, PathInfo
@ -303,7 +304,7 @@ class Request a where
instance Request () where
parseRequest = return ()
-- | Unsures that a String parameter is not blank.
-- | Ensures that a String parameter is not blank.
notBlank :: MonadRequestReader m => RawParam -> m String
notBlank rp =
case paramValue rp of