slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

web: better hamlet override

Browse Source
This commit is contained in:
Simon Michael 2012-04-03 17:53:12 +00:00
parent 64b6316785
commit 296a4d1bb2
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
hledger-web/Hledger/Web/Settings.hs
View File

@ -28,6 +28,8 @@ import Text.Shakespeare.Text (st)
import Yesod.Default.Config import Yesod.Default.Config
import qualified Yesod.Default.Util import qualified Yesod.Default.Util
import qualified Text.Hamlet (hamlet) import qualified Text.Hamlet (hamlet)
-- when available:
-- import Text.Hamlet (HamletSettings(..), hamletWithSettings, defaultHamletSettings, hamletRules)
hledgerorgurl, manualurl :: String hledgerorgurl, manualurl :: String
@ -83,8 +85,5 @@ parseExtra _ o = Extra
<*> o .:? "analytics" <*> o .:? "analytics"
hamlet :: QuasiQuoter hamlet :: QuasiQuoter
#if DEVELOPMENT
hamlet = Text.Hamlet.hamlet -- Text.Hamlet.hamlet' when available
#else
hamlet = Text.Hamlet.hamlet hamlet = Text.Hamlet.hamlet
#endif -- hamlet = hamletWithSettings hamletRules defaultHamletSettings{hamletNewlines=True}