SVN: toys/stbr/stbr.tcl

[shadzik]

Author: shadzik
Date: Tue Nov 27 19:27:25 2007
New Revision: 9112

Modified:
   toys/stbr/stbr.tcl
Log:
- more precise URL for tracking


Modified: toys/stbr/stbr.tcl
==============================================================================
--- toys/stbr/stbr.tcl	(original)
+++ toys/stbr/stbr.tcl	Tue Nov 27 19:27:25 2007
@@ -97,9 +97,9 @@
 }
 exec sqlite $logfile "INSERT INTO stbr VALUES('$date','$nick');"
 if {([string match test-build $first])} {
-	putserv "privmsg $chan :$nick: Sent $first request for $tspecs directly to builders. Visit http://stbr.pld-linux.org/ to track your request."
+	putserv "privmsg $chan :$nick: Sent $first request for $tspecs directly to builders. Visit http://stbr.pld-linux.org/?show=$nick&date=$date to track your request."
 } {
-	putserv "privmsg $chan :$nick: Sent STBR Mail for $rspecs. An $first will be performed. Visit http://stbr.pld-linux.org/ to track your request."
+	putserv "privmsg $chan :$nick: Sent STBR Mail for $rspecs. An $first will be performed. Visit http://stbr.pld-linux.org/?show=$nick&date=$date to track your request."
 }
 if {$cntr<1} {incr cntr} {utimer 30 "set cntr 0"; return 1}
 }