summaryrefslogtreecommitdiff
path: root/Hsbot
diff options
context:
space:
mode:
Diffstat (limited to 'Hsbot')
-rw-r--r--Hsbot/Plugin/Quote.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/Hsbot/Plugin/Quote.hs b/Hsbot/Plugin/Quote.hs
index bb8b531..953ae52 100644
--- a/Hsbot/Plugin/Quote.hs
+++ b/Hsbot/Plugin/Quote.hs
@@ -261,5 +261,6 @@ quoteStart quoteDB msg quotee phrase =
let newQuote = emptyQuote { quoter = sender
, quotE = [ QuoteElt { eltQuotee = quotee, eltQuote = thatQuote } ]
, quoteTime = now }
- update' quoteDB (SetQuote quoteID newQuote)
+ _ <- update' quoteDB (SetQuote quoteID newQuote)
+ answerMsg msg $ sender ++ ": new quote added with ID " ++ show quoteID