Author: shadzik
Date: Sat Oct 31 04:09:38 2009
New Revision: 10907
Modified:
toys/stbr/stbr.tcl
Log:
- fixed build status activation
Modified: toys/stbr/stbr.tcl
==============================================================================
--- toys/stbr/stbr.tcl (original)
+++ toys/stbr/stbr.tcl Sat Oct 31 04:09:38 2009
@@ -32,8 +32,10 @@
putlog "Sending Identify to NickServ"
}
-if {([string match fu-berlin $server]) || ([string match tu-ilmenau $server])}
{
+putlog "STBR: using config $config"
+if {([string match "stbr.conf" $config])} {
bind time - "* * * * *" pub:buildstatus
+ putlog "STBR: Buildstatus activated"
}
proc putqueue {ver} {
@@ -52,6 +54,7 @@
putqueue ti
putqueue th
putqueue aidath
+ putlog "Searched for status"
}
proc help {nick} {
_______________________________________________
pld-cvs-commit mailing list
[email protected]
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit