yesod-core 0.10.2 → 0.10.2.1

raw patch · 4 files changed

+17/−6 lines, 4 files

Files

Yesod/Core.hs +1/−0
Yesod/Internal/Core.hs +10/−5
test/test.hs +5/−0
yesod-core.cabal +1/−1

Yesod/Core.hs view

@@ -30,6 +30,7 @@     -- * JS loaders     , loadJsYepnope     , ScriptLoadPosition (..)+    , BottomOfHeadAsync       -- * Misc     , yesodVersion     , yesodRender

Yesod/Internal/Core.hs view

@@ -27,6 +27,7 @@     , messageLoggerHandler       -- * jsLoader     , ScriptLoadPosition (..)+    , BottomOfHeadAsync     , loadJsYepnope       -- * Misc     , yesodVersion@@ -641,11 +642,15 @@             : attrs             ) -data Yesod master => ScriptLoadPosition master = BottomOfBody | BottomOfHeadBlocking | BottomOfHeadAsync (-                  [Text] -- ^ urls to load asynchronously-                  -> Maybe (HtmlUrl (Route master)) -- ^ widget of js to run on async completion-                  -> (HtmlUrl (Route master)) -- ^ widget to insert at the bottom of <head>-                  )+data ScriptLoadPosition master+    = BottomOfBody+    | BottomOfHeadBlocking+    | BottomOfHeadAsync (BottomOfHeadAsync master)++type BottomOfHeadAsync master+       = [Text] -- ^ urls to load asynchronously+      -> Maybe (HtmlUrl (Route master)) -- ^ widget of js to run on async completion+      -> (HtmlUrl (Route master)) -- ^ widget to insert at the bottom of <head>  left :: Either a b -> Maybe a left (Left x) = Just x

+ test/test.hs view

@@ -0,0 +1,5 @@+import Test.Hspec+import qualified YesodCoreTest++main :: IO ()+main = hspecX $ descriptions $ YesodCoreTest.specs

yesod-core.cabal view

@@ -1,5 +1,5 @@ name:            yesod-core-version:         0.10.2+version:         0.10.2.1 license:         BSD3 license-file:    LICENSE author:          Michael Snoyman <michael@snoyman.com>