web: fix compilation after recent lib changes

hledger-web/Application.hs

@@ -77,7 +77,7 @@ makeFoundation conf = do
 getApplicationDev :: IO (Int, Application)
 getApplicationDev = do
   f <- journalFilePathFromOpts defcliopts
-  j <- either error' id `fmap` readJournalFile Nothing Nothing f
+  j <- either error' id `fmap` readJournalFile Nothing Nothing True f
   defaultDevelApp loader (makeApplication defwebopts j)
   where
     loader = Yesod.Default.Config.loadConfig (configSettings Development)

hledger-web/Handler/Post.hs

@@ -125,7 +125,7 @@ handleEdit = do
        setMessage "No change"
        redirect JournalR
      else do
-      jE <- liftIO $ readJournal Nothing Nothing (Just journalpath) tnew
+      jE <- liftIO $ readJournal Nothing Nothing True (Just journalpath) tnew
       either
        (\e -> do
           setMessage $ toHtml e

hledger-web/Hledger/Web/Main.hs

@@ -49,7 +49,7 @@ runWith opts
 
 withJournalDo' :: WebOpts -> (WebOpts -> Journal -> IO ()) -> IO ()
 withJournalDo' opts cmd = do
-  journalFilePathFromOpts (cliopts_ opts) >>= readJournalFile Nothing Nothing >>=
+  journalFilePathFromOpts (cliopts_ opts) >>= readJournalFile Nothing Nothing True >>=
     either error' (cmd opts . journalApplyAliases (aliasesFromOpts $ cliopts_ opts))
 
 -- | The web command.