summaryrefslogtreecommitdiff
path: root/Hsbot
diff options
context:
space:
mode:
authorJulien Dessaux2011-09-30 22:46:10 +0200
committerJulien Dessaux2011-09-30 22:46:10 +0200
commitaccf85183b5bce8437e003046f57761615ebb70a (patch)
tree2c726f57c92e19d00d3077614c923c8d4ce45e72 /Hsbot
parentcosmetic (diff)
downloadhsbot-accf85183b5bce8437e003046f57761615ebb70a.tar.gz
hsbot-accf85183b5bce8437e003046f57761615ebb70a.tar.bz2
hsbot-accf85183b5bce8437e003046f57761615ebb70a.zip
Forgot to add a notification on quote start command.
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