Remove superfluous trailing white space from TCL files

2014-05-16 12:30:51 +10:00
parent 89e4e37f9e
commit 92d3acb5d5
230 changed files with 1835 additions and 1835 deletions
--- a/site_ansto/instrument/config/environment/sct_autolab.tcl
+++ b/site_ansto/instrument/config/environment/sct_autolab.tcl
@@ -78,7 +78,7 @@ debug_log "setPoint: sct=[sct] target=[sct target] writestatus=[sct writestatus]
      set err_msg "Invalid Pallet_ Num: [hval $tc_root/Control/Pallet_Nam]"
    } elseif { [hval $tc_root/Control/Pallet_Idx] < 1 || [hval $tc_root/Control/Pallet_Idx] > 50 } {
      set err_msg "Invalid Pallet_Idx: [hval $tc_root/Control/Pallet_Idx]"
-    } 
+    }
    if { $err_msg != "" } {
      sct print "error:$err_msg"
      debug_log "error:$err_msg"