snap-extras 0.12.0.0 → 0.12.1.0

raw patch · 7 files changed

+11/−9 lines, 7 filesdep ~basePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: base

API changes (from Hackage documentation)

Files

• changelog.md +3/−0
• snap-extras.cabal +1/−1
• src/Snap/Extras.hs +1/−1
• src/Snap/Extras/FlashNotice.hs +1/−1
• src/Snap/Extras/NavTrails.hs +1/−1
• src/Snap/Extras/PollStatus.hs +3/−5
• src/Snap/Extras/Tabs.hs +1/−0

@@ -1,2 +1,5 @@+0.12.1.0+* Backwards compatibility fixes for versions of base < 4.8.+ 0.12.0.0 * Support snap 1.0. This drops support for some older versions of snap.

@@ -1,5 +1,5 @@ Name:                snap-extras-Version:             0.12.0.0+Version:             0.12.1.0 Synopsis:            A collection of useful helpers and utilities for Snap web applications. Description:         This package contains a collection of helper functions                      that come in handy in most practical, real-world

@@ -15,7 +15,7 @@  ------------------------------------------------------------------------------- import           Control.Lens-import           Data.Monoid+import           Data.Monoid                         (mempty) import           Heist import           Snap.Snaplet import           Snap.Snaplet.Heist

@@ -17,7 +17,7 @@ import           Control.Monad.Trans import qualified Data.Map.Syntax      as MS import           Data.Maybe-import           Data.Monoid+import           Data.Monoid          (mempty) import           Data.Text            (Text) import qualified Data.Text            as T import           Heist

@@ -10,7 +10,7 @@ import           Data.ByteString                     (ByteString) import qualified Data.Map.Syntax                     as MS import           Data.Maybe-import           Data.Monoid+import           Data.Monoid                         (mempty) import           Data.Text                           (Text) import qualified Data.Text.Encoding                  as T import           Heist

@@ -89,16 +89,15 @@   ) where  -------------------------------------------------------------------------------import           Blaze.ByteString.Builder import qualified Blaze.ByteString.Builder.Char8 as BB-import           Control.Applicative+import           Control.Applicative            as A import           Control.Monad import           Control.Monad.Trans import           Control.Monad.Trans.Maybe import           Data.ByteString                (ByteString) import qualified Data.Map.Syntax                as MS import           Data.Maybe-import           Data.Monoid+import           Data.Monoid                    (mempty) import           Data.Readable import           Data.Text import qualified Data.Text                      as T@@ -107,7 +106,6 @@ import           Heist.Compiled import           Heist.Splices import           Language.Javascript.JMacro-import           Snap.Core import           Snap.Snaplet import           Snap.Snaplet.Heist.Compiled    (HasHeist) import           Text.PrettyPrint.Leijen.Text   (renderOneLine)@@ -275,6 +273,6 @@ ------------------------------------------------------------------------------ statusElapsed :: Status -> Maybe Int statusElapsed Status{..} =-    round . diffUTCTime statusTimestamp <$> statusStartTime+    round . diffUTCTime statusTimestamp A.<$> statusStartTime  

@@ -27,6 +27,7 @@ import           Control.Monad.Trans import qualified Data.Map.Syntax          as MS import           Data.Maybe+import           Data.Monoid              (mempty) import           Data.Text                (Text) import qualified Data.Text                as T import qualified Data.Text.Encoding       as T