snap-app 0.1.4 → 0.1.5

raw patch · 3 files changed

+21/−1 lines, 3 files

Files

• snap-app.cabal +2/−1
• src/Control/Monad/Catch.hs +5/−0
• src/Control/Monad/Env.hs +14/−0

@@ -1,5 +1,5 @@ name:                snap-app-version:             0.1.4+version:             0.1.5 synopsis:            Simple modules for writing apps with Snap, abstracted from hpaste. homepage:            Simple modules for writing apps with Snap, abstracted from hpaste. license:             BSD3@@ -13,6 +13,7 @@ library   hs-source-dirs:    src   exposed-modules:   Snap.App, Snap.App.Types, Snap.App.Controller, Snap.App.Model, Snap.App.Migrate+  other-modules:     Control.Monad.Catch, Control.Monad.Env   build-depends:     base >= 4 && <5,                      snap-core,                      network,

@@ -0,0 +1,5 @@+{-# LANGUAGE PackageImports #-}++module Control.Monad.Catch (module Control.Monad.CatchIO) where++import "MonadCatchIO-transformers" Control.Monad.CatchIO

@@ -0,0 +1,14 @@+{-# OPTIONS -Wall #-}+{-# LANGUAGE OverloadedStrings #-}++-- | Abstraction of environment functions (could be state, could be+--   reader, whatever). Intended to ease migration from Reader/State.++module Control.Monad.Env+  (env)+  where++import Control.Monad.Reader++env :: MonadReader env m => (env -> val) -> m val+env = asks