packages feed

yesod-angular-ui 0.1.0.1 → 0.1.1.0

raw patch · 2 files changed

+15/−3 lines, 2 filesdep ~base

Dependency ranges changed: base

Files

src/Yesod/AngularUI.hs view
@@ -25,6 +25,7 @@     , addConfig     , addConfigRaw     , addService+    , addRun      , addFactoryStore    -- ^ naive persistent store@@ -33,6 +34,7 @@     , addProvide     , addFilter     , addConstant+    , addValue    -- some normal stuff     , addSetup    -- ^ before the code, maybe some imports?@@ -155,6 +157,13 @@         #{rawJS n}.^{funcall}; }])|]         } +addRun :: (Monad m) => ((Route master -> [(Text, Text)] -> Text) -> Javascript)+                       -> GAngular master m ()+addRun funcall =+    tell mempty+        { awConfigs = [julius|.run(^{funcall})|]+        }+ addConfigRaw :: (Monad m) => ((Route master -> [(Text, Text)] -> Text) -> Javascript)                           -> GAngular master m () addConfigRaw funcall = tell mempty { awConfigs = [julius|.config(^{funcall})|] }@@ -231,6 +240,11 @@ -- ^ add constant, remember to quote if raw text addConstant n funcall = addProvide [julius|constant("#{rawJS n}",^{funcall})|] ++addValue :: (Monad m) => Text -> ((Route master -> [(Text, Text)] -> Text) -> Javascript) -> GAngular master m ()+-- ^ add constant, remember to quote if raw text+addValue n funcall = addProvide [julius|value("#{rawJS n}",^{funcall})|]+ addSetup :: (Monad m) => ((Route master -> [(Text, Text)] -> Text) -> Javascript)                       -> GAngular master m () -- ^ inject this code befor calling angular@@ -284,8 +298,6 @@              }      }     |]--  url :: Monad m => Text -> WriterT (UiState master) m () url u = tell mempty {uisUrl  = Just u}
yesod-angular-ui.cabal view
@@ -1,5 +1,5 @@ name:                yesod-angular-ui-version:             0.1.0.1+version:             0.1.1.0 synopsis:            Angular Helpers description:         Library for developing i18n webapps with yesod and angular. homepage:            https://github.com/tolysz/yesod-angular-ui