nek0/eidolon
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

remodeling footer

Browse source
This commit is contained in:
nek0 2016-09-09 19:15:02 +02:00
parent ae9688b00f
commit da98f31d50
3 changed files with 2 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
Foundation.hs
View file

@ -98,9 +98,6 @@ renderLayout widget = do
-- value passed to hamletToRepHtml cannot be a widget, this allows -- value passed to hamletToRepHtml cannot be a widget, this allows
-- you to use normal widget features in default-layout. -- you to use normal widget features in default-layout.
copyrightWidget <- widgetToPageContent $
$(widgetFile "copyrightFooter")
-- searchWidget <- widgetToPageContent $ [whamlet| -- searchWidget <- widgetToPageContent $ [whamlet|
-- <form action=@{SearchR} method=GET> -- <form action=@{SearchR} method=GET>
-- <input type="hidden" name="_hasdata"> -- <input type="hidden" name="_hasdata">

1
templates/copyrightFooter.hamlet
View file

@ -1 +0,0 @@
<a href=@{AboutR} target=_blank>About Eidolon

3
templates/default-layout-wrapper.hamlet
View file

@ -18,7 +18,8 @@ $doctype 5
^{pageBody pc} ^{pageBody pc}
<footer> <footer>
<div class="left"> <div class="left">
^{pageBody copyrightWidget} <a href=@{AboutR} target="_blank">
About Eidolon
<div class="right"> <div class="right">
$case route $case route
$of Just HomeR $of Just HomeR