Author: shadzik
Date: Sun May 13 18:31:44 2007
New Revision: 8519
Modified:
toys/stbr/stbr.tcl
Log:
- better without & at end of command
Modified: toys/stbr/stbr.tcl
==============================================================================
--- toys/stbr/stbr.tcl (original)
+++ toys/stbr/stbr.tcl Sun May 13 18:31:44 2007
@@ -24,7 +24,7 @@
foreach spec $specs {
if {!([string match *.spec $spec])} { append spec ".spec"}
lappend rspecs $spec
-if {[exec $file $nick $first $spec $back]==0} {putserv "privmsg $chan :$nick:
An error occured. Couldn't send STBR Mail for $spec."; return 1}
+if {[exec $file $nick $first $spec]==0} {putserv "privmsg $chan :$nick: An
error occured. Couldn't send STBR Mail for $spec."; return 1}
set tfile [open $towho r]
gets $tfile person; append rspecs " (to $person)"
close $tfile
_______________________________________________
pld-cvs-commit mailing list
[email protected]
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit
