-- Hoogle documentation, generated by Haddock
-- See Hoogle, http://www.haskell.org/hoogle/


-- | Yesod AngularJS integration.
--   
--   Yesod AngularJS integration. This module is based on Michael Snoyman's
--   original work in the <a>https://github.com/snoyberg/yesod-js</a>
--   repository.
@package yesod-angular
@version 0.1.0.0


-- | Yesod Angular JS Integration.
--   
--   This module is based on Michael Snoyman's original work in the
--   <a>https://github.com/snoyberg/yesod-js</a> repository.
--   
--   <ul>
--   <li>This module currently defaults to Angular 1.2.18. Use
--   <tt>urlAngularJs_</tt> specify your own Angular location. * Example
--   can be found at:
--   <a>https://github.com/snoyberg/yesod-js/tree/master/yesod-angular</a>
--   * Currently, this module looks for controllers in the
--   `templates/angular` directory.</li>
--   </ul>
module Yesod.Angular
class Yesod site => YesodAngular site where urlAngularJs _ = [Right "//cdnjs.cloudflare.com/ajax/libs/angular.js/1.2.18/angular.min.js", Right "//cdnjs.cloudflare.com/ajax/libs/angular.js/1.2.18/angular-route.min.js"] wrapAngular modname widget = defaultLayout (do { (asWidgetT . toWidget) ((preEscapedText . pack) "<div ng-app=\""); (asWidgetT . toWidget) (toHtml modname); (asWidgetT . toWidget) ((preEscapedText . pack) "\">"); (asWidgetT . toWidget) widget; (asWidgetT . toWidget) ((preEscapedText . pack) " </div>") })
urlAngularJs :: YesodAngular site => site -> [Either (Route site) Text]
wrapAngular :: YesodAngular site => Text -> WidgetT site IO () -> HandlerT site IO Html
runAngular :: YesodAngular site => AngularT site () -> HandlerT site IO Html
addCommand :: (FromJSON input, ToJSON output) => (input -> HandlerT site IO output) -> AngularT site Text
addCtrl :: Text -> Text -> Q Exp
addCtrlRaw :: Text -> Text -> HtmlUrl (Route site) -> JavascriptUrl (Route site) -> AngularT site ()
setDefaultRoute :: Text -> AngularT site ()
type AngularT site = WriterT (AngularWriter site) (HandlerT site IO)
instance Monoid (AngularWriter site)