diff --git a/hledger-web/Handler/AddForm.hs b/hledger-web/Handler/AddForm.hs
index ed829e20a..84835967e 100644
--- a/hledger-web/Handler/AddForm.hs
+++ b/hledger-web/Handler/AddForm.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE FlexibleContexts #-}
 -- | Add form data & handler. (The layout and js are defined in
 -- Foundation so that the add form can be in the default layout for
 -- all views.)
diff --git a/hledger-web/Handler/Utils.hs b/hledger-web/Handler/Utils.hs
index e6b62b224..8bf1d66ba 100644
--- a/hledger-web/Handler/Utils.hs
+++ b/hledger-web/Handler/Utils.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE CPP #-}
 -- | Web handler utilities. More of these are in Foundation.hs, where
 -- they can be used in the default template.
 
@@ -7,8 +8,9 @@ import Prelude
 import Data.Time.Calendar
 import Data.Time.Clock
 import Data.Time.Format
+#if !(MIN_VERSION_time(1,5,0))
 import System.Locale (defaultTimeLocale)
-
+#endif
 
 numbered :: [a] -> [(Int,a)]
 numbered = zip [1..]