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

Merge pull request #5 from alios/master

Browse Source 
Reorder of HTML Header generation
This commit is contained in:
Michael Snoyman 2011-06-14 06:55:29 -07:00
commit c41e714cb1
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Yesod/Internal/Core.hs
View File

@ -531,8 +531,6 @@ widgetToPageContent (GWidget w) = do
#else #else
[$hamlet| [$hamlet|
#endif #endif
$forall s <- scripts
^{mkScriptTag s}
$forall s <- stylesheets $forall s <- stylesheets
^{mkLinkTag s} ^{mkLinkTag s}
$forall s <- css $forall s <- css
@ -546,6 +544,8 @@ $forall s <- css
<style media=#{media}>#{content} <style media=#{media}>#{content}
$nothing $nothing
<style>#{content} <style>#{content}
$forall s <- scripts
^{mkScriptTag s}
$maybe j <- jscript $maybe j <- jscript
$maybe s <- jsLoc $maybe s <- jsLoc
<script src="#{s}"> <script src="#{s}">