Remove superfluous trailing white space from TCL files

site_ansto/instrument/lyrebird/config/tasmad/sicscommon/ccdwww.tcl

@@ -1,20 +1,20 @@
 #------------------------------------------------------
 # This is SICS HM driver code for the CCDWWW CCD camera
-# WWW server as used at SINQ. It uses, of course, the 
+# WWW server as used at SINQ. It uses, of course, the
 # scriptcontext asynchronous I/O system
 #
 # Mark Koennecke, September 2010
 #-------------------------------------------------------
- 
+
 namespace eval ccdwww {}
 #-------------------------------------------------------
-# This is a default init script. The user has to initialise 
+# This is a default init script. The user has to initialise
 # a list of nodes to send to the CCD in XML format as
 # variable ccdwww::initnodes
 #--------------------------------------------------------
 proc ccdwww::initscript {name} {
   global ccdwww::initnodes
-  
+
   append confdata "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
   foreach var $ccdwww::initnodes {
     set val [hval /sics/${name}/${var}]
@@ -68,8 +68,8 @@ proc ccdwww::httpstartreply {} {
     return idle
 }
 #---------------------------------------------------------
-# A CCD works like a camera. When exposing, it cannot be stopped, 
-# paused or anything. This is why the appropriate methods 
+# A CCD works like a camera. When exposing, it cannot be stopped,
+# paused or anything. This is why the appropriate methods
 # here have no implementation
 #----------------------------------------------------------
 proc ccdwww::httpcontrol {} {
@@ -111,7 +111,7 @@ proc ccdwww::httpdatareply {} {
     set status [catch {httpreply} txt]
     if {$status == 0} {
       set path [file dirname [sct]]
-      hdelprop $path/data geterror 
+      hdelprop $path/data geterror
     }
     return idle
 }
@@ -135,13 +135,13 @@ proc ccdwww::httpevalstatus {name} {
         clientput $data
         sct update error
         return idle
-    } 
+    }
     hdelprop [sct] geterror
     if {$data == 0} {
       httpdata $name
       return httpstatusdata
     } else {
-       sct update run      
+       sct update run
        [sct controller] queue [sct] progress read
        return idle
     }