SVN: toys/stbr/stbr.tcl

[shadzik]

Author: shadzik
Date: Sat Oct 31 04:27:34 2009
New Revision: 10910

Modified:
   toys/stbr/stbr.tcl
Log:
- some configuration enhancements and a big fat warning for dummies


Modified: toys/stbr/stbr.tcl
==============================================================================
--- toys/stbr/stbr.tcl	(original)
+++ toys/stbr/stbr.tcl	Sat Oct 31 04:27:34 2009
@@ -17,6 +17,9 @@
 set bannedspec "./scripts/bannedspec.txt"
 set queueparser "./scripts/queue_parser.pl"
 set queuechan "#pld"
+set actconfig "stbr.conf"
+
+############ DO NOT CHANGE ANYTHING BELOW UNLESS YOU KNOW WHAT YOU"RE DOING ###############
 
 bind notc - "*This nickname is owned by someone else*" identify
 bind dcc n identify man_identify 
@@ -34,7 +37,7 @@
 }
 
 putlog "STBR: using config $config"
-if {([string match "stbr.conf" $config])} {
+if {([string match $actconfig $config])} {
 	bind time - "* * * * *" pub:buildstatus
 	putlog "STBR: Buildstatus activated"
 }