web: silence one more pesky warning
This commit is contained in:
parent
0bc16d4af6
commit
115643a024
@ -65,5 +65,5 @@ putAddR = do
|
|||||||
case r of
|
case r of
|
||||||
Error err -> sendStatusJSON status400 ("could not parse json: " ++ err ::String)
|
Error err -> sendStatusJSON status400 ("could not parse json: " ++ err ::String)
|
||||||
Success t -> do
|
Success t -> do
|
||||||
liftIO $ journalAddTransaction j (cliopts_ opts) t
|
void $ liftIO $ journalAddTransaction j (cliopts_ opts) t
|
||||||
sendResponseCreated TransactionsR
|
sendResponseCreated TransactionsR
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user