haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge pull request #1308 from sbditto85/default_attrs_julius

Browse Source 
added jsAttributes for the script tag generated by julius files
This commit is contained in:
Michael Snoyman 2016-11-27 05:45:48 +02:00 committed by GitHub
commit ed87ded970
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
yesod-core/Yesod/Core/Class/Yesod.hs
View File

@ -254,6 +254,11 @@ class RenderRoute site => Yesod site where
jsLoader :: site -> ScriptLoadPosition site jsLoader :: site -> ScriptLoadPosition site
jsLoader _ = BottomOfBody jsLoader _ = BottomOfBody
-- | Default attributes to put on the JavaScript <script> tag
-- generated for julius files
jsAttributes :: site -> [(Text, Text)]
jsAttributes _ = []
-- | Create a session backend. Returning 'Nothing' disables -- | Create a session backend. Returning 'Nothing' disables
-- sessions. If you'd like to change the way that the session -- sessions. If you'd like to change the way that the session
-- cookies are created, take a look at -- cookies are created, take a look at
@ -570,7 +575,7 @@ widgetToPageContent w = do
^{mkScriptTag s} ^{mkScriptTag s}
$maybe j <- jscript $maybe j <- jscript
$maybe s <- jsLoc $maybe s <- jsLoc
<script src="#{s}"> <script src="#{s}" *{jsAttributes master}>
$nothing $nothing
<script>^{jelper j} <script>^{jelper j}
|] |]