diff options
| -rw-r--r-- | Hsbot/Plugin/Quote.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Hsbot/Plugin/Quote.hs b/Hsbot/Plugin/Quote.hs index af61114..0e8e363 100644 --- a/Hsbot/Plugin/Quote.hs +++ b/Hsbot/Plugin/Quote.hs @@ -192,8 +192,8 @@ theQuote = do Nothing -> answerMsg msg $ (getSender msg) ++ ": Invalid quoteID or empty database." _ -> answerMsg msg $ getSender msg ++ " : Invalid quoteID." "quote":"show":[] -> showRandomQuote - "quote":"start":quotee:[phrase] -> quoteStart quoteDB msg quotee phrase - "quote":quotee:[phrase] -> quoteStart quoteDB msg quotee phrase + "quote":"start":quotee:phrase -> quoteStart quoteDB msg quotee $ unwords phrase + "quote":quotee:phrase -> quoteStart quoteDB msg quotee $ unwords phrase "quote":_ -> answerMsg msg "Invalid quote command." "vote":"help":"quick":_ -> do answerMsg msg "vote [quick] [QUOTEID] { +1 | -1 | ++ | -- }" |