web: silence one more pesky warning

2019-02-20 20:45:09 -08:00 · 2019-02-20 20:45:09 -08:00 · 115643a024
commit 115643a024
parent 0bc16d4af6
1 changed files with 1 additions and 1 deletions
--- a/hledger-web/Hledger/Web/Handler/AddR.hs
+++ b/hledger-web/Hledger/Web/Handler/AddR.hs
@ -65,5 +65,5 @@ putAddR = do
  case r of
    Error err -> sendStatusJSON status400 ("could not parse json: " ++ err ::String)
    Success t -> do
-      liftIO $ journalAddTransaction j (cliopts_ opts) t
+      void $ liftIO $ journalAddTransaction j (cliopts_ opts) t
      sendResponseCreated TransactionsR