packages feed

happstack-foundation 0.2.1 → 0.2.2

raw patch · 2 files changed

+10/−5 lines, 2 filesdep ~mtl

Dependency ranges changed: mtl

Files

Happstack/Foundation.hs view
@@ -171,15 +171,20 @@ whereami = here <$> get  -- | get the 'requestState' value-getRequestState :: (Functor m, Monad m) => FoundationT url acidState requestState m requestState+getRequestState :: (Functor m, MonadState (AppState url acidState requestState) m) => m requestState getRequestState = reqSt <$> get  -- | set the 'requestState' value-setRequestState :: (Functor m, Monad m) => requestState -> FoundationT url acidState requestState m ()+setRequestState :: (Functor m, MonadState (AppState url acidState requestState) m) =>+                   requestState+                -> m () setRequestState st = modify $ \appState -> appState { reqSt = st }  -- | set the 'requestState' value-modifyRequestState :: (Functor m, Monad m) => (requestState -> requestState) -> FoundationT url acidState requestState m ()+modifyRequestState :: MonadState (AppState url acidState requestState) m =>+                      (requestState -> requestState)+                   -> m ()+ modifyRequestState f = modify $ \appState -> appState { reqSt = f (reqSt appState) }  instance (Functor m, Monad m) => HasAcidState (FoundationT url acidState requestState m) acidState where
happstack-foundation.cabal view
@@ -1,5 +1,5 @@ Name:                happstack-foundation-Version:             0.2.1+Version:             0.2.2 Synopsis:            Glue code for using Happstack with acid-state, web-routes, reform, and HSP Description:         happstack-foundation is a library which builds on top of existing components                      to provide a powerful and type-safe environment for web development. It uses:@@ -32,7 +32,7 @@                      hsp                   == 0.7.*,                      lifted-base           == 0.1.*,                      monad-control         == 0.3.*,-                     mtl                   == 2.1.*,+                     mtl                   >= 2.0 && < 2.2,                      reform                == 0.1.*,                      reform-happstack      == 0.1.*,                      reform-hsp            == 0.1.*,