axis.tcl: workaround for tcl8.6 breakage

see https://sourceforge.net/p/emc/mailman/emc-developers/thread/[email protected]/
mrsolis93 · May 19, 2015 · b031783 · b031783
1 parent b63c0b0
commit b031783
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/share/axis/tcl/axis.tcl b/share/axis/tcl/axis.tcl
@@ -1982,6 +1982,7 @@ proc update_title {args} {
 }
 
 proc update_state {args} {
+    set mytest "Hooray!"
     switch $::task_state \
         $::STATE_ESTOP { set ::task_state_string [_ "ESTOP"] } \
         $::STATE_ESTOP_RESET { set ::task_state_string [_ "OFF"] } \