From 115643a02419de6960d611b05450e135dcb74c78 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Wed, 20 Feb 2019 20:45:09 -0800 Subject: [PATCH] web: silence one more pesky warning --- hledger-web/Hledger/Web/Handler/AddR.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/hledger-web/Hledger/Web/Handler/AddR.hs b/hledger-web/Hledger/Web/Handler/AddR.hs index d5c53307f..5b74cb983 100644 --- 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