From 296a4d1bb2675d6f68cb39a3613f2559e58abac5 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Tue, 3 Apr 2012 17:53:12 +0000
Subject: [PATCH] web: better hamlet override

---
 hledger-web/Hledger/Web/Settings.hs | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/hledger-web/Hledger/Web/Settings.hs b/hledger-web/Hledger/Web/Settings.hs
index 54ed79e2c..c891039dc 100644
--- a/hledger-web/Hledger/Web/Settings.hs
+++ b/hledger-web/Hledger/Web/Settings.hs
@@ -28,6 +28,8 @@ import Text.Shakespeare.Text (st)
 import Yesod.Default.Config
 import qualified Yesod.Default.Util
 import qualified Text.Hamlet (hamlet)
+-- when available:
+-- import Text.Hamlet (HamletSettings(..), hamletWithSettings, defaultHamletSettings, hamletRules)
 
 
 hledgerorgurl, manualurl :: String
@@ -83,8 +85,5 @@ parseExtra _ o = Extra
     <*> o .:? "analytics"
 
 hamlet :: QuasiQuoter
-#if DEVELOPMENT
-hamlet = Text.Hamlet.hamlet -- Text.Hamlet.hamlet' when available
-#else
 hamlet = Text.Hamlet.hamlet
-#endif
+-- hamlet = hamletWithSettings hamletRules defaultHamletSettings{hamletNewlines=True}