Author: shadzik
Date: Wed Oct 7 21:12:37 2009
New Revision: 10717
Modified:
toys/stbr/stbr.tcl
Log:
- fix
Modified: toys/stbr/stbr.tcl
==============================================================================
--- toys/stbr/stbr.tcl (original)
+++ toys/stbr/stbr.tcl Wed Oct 7 21:12:37 2009
@@ -204,7 +204,7 @@
if {([string match */* $spec])} {
set halfs [split $spec "/"]
set spechalf [lindex $halfs 0]
- set bcondshalf [lindex $halfs 1]
+ set bcondhalf [lindex $halfs 1]
if {([string match *:* $spechalf])} {
set halfs [split $spechalf ":"]
set spec [lindex $halfs 0]
_______________________________________________
pld-cvs-commit mailing list
[email protected]
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit
