snap 0.10.0 → 0.10.0.1

raw patch · 3 files changed

+6/−7 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• snap.cabal +1/−1
• src/Snap/Snaplet.hs +4/−5
• src/Snap/Snaplet/HeistNoClass.hs +1/−1

@@ -1,5 +1,5 @@ name:           snap-version:        0.10.0+version:        0.10.0.1 synopsis:       Top-level package for the Snap Web Framework description:     This is the top-level package for the official Snap Framework libraries.

@@ -179,12 +179,10 @@ -- a lens @quux :: SimpleLens Foo Quux@, then you could create a lens of type -- @SimpleLens App Quux@ by composition: ----- > import Control.Category--- > import Prelude hiding ((.))    -- you have to hide (.) from the Prelude--- >                                -- to use Control.Category.(.)+-- > import Control.Lens -- > -- > data Foo = Foo { _quux :: Quux }--- > makeLenses [''Foo]+-- > makeLenses ''Foo -- > -- > -- snapletValue is defined in the framework: -- > snapletValue :: SimpleLens (Snaplet a) a@@ -285,6 +283,7 @@ Snaplet) we want to use as well as any other state we might want.}  > module MyApp where+> import Control.Lens > import Snap.Snaplet > import Snap.Snaplet.Heist >@@ -295,7 +294,7 @@ >     , _companyName :: String >     } >-> makeLenses [''App]+> makeLenses ''App  The next thing we need to do is define an initializer. 

@@ -374,7 +374,7 @@     p <- getSafePath     -- Allows users to prefix template filenames with an underscore to prevent     -- the template from being served.-    if head p == '_' then pass else return $ B.pack p+    if take 1 p == "_" then pass else return $ B.pack p   ------------------------------------------------------------------------------