Changeset 15 for QuoteEngine

Timestamp:

10/04/06 18:17:29 (6 years ago)

Author:

james

Message:

warn users if it looks they added a quote with bad line splits

File:

• QuoteEngine/QuoteEngine.tcl (modified) (1 diff)

QuoteEngine/QuoteEngine.tcl

@@ -112 +112 @@
     set id [mysqlinsertid $db_handle]
     puthelp "PRIVMSG $channel :Quote \002$id\002 added"
+                if [regexp {[^]> ]\|[[<0-9(]} $text] {
+                        puthelp "PRIVMSG $nick :It's possible you didn't split the lines quite right on the quote you just added. For best results, split lines in quotes using '|' with a space each side. To delete the quote you just added and fix it, do '!quote del $id' in the channel."
+                }
   }
 }