linse/sics
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added -get option for gumtree commands.

Browse Source 
r2132 | ffr | 2007-08-16 17:07:59 +1000 (Thu, 16 Aug 2007) | 2 lines
This commit is contained in:
Ferdi Franceschini
2007-08-16 17:07:59 +10:00
committed by Douglas Clowes
parent 00b91be2ae
commit e7c52b18f1
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
site_ansto/instrument/util/command.tcl
View File

@@ -85,7 +85,7 @@ proc command {acmdName arglist body} {
} }
} }
} }
-set { -set - -get {
if {[lindex $args 1] == "feedback"} { if {[lindex $args 1] == "feedback"} {
set __vname [lindex $args 2] set __vname [lindex $args 2]
set __ptype fb set __ptype fb