- Improved centering in DIFRAC

- Fixed a bug in UserWait
- Improved scan message in scancom
- Added zero point correction in lin2ang
- fixed an issue with uuencoded messages

tcl/scancom.tcl

@@ -352,8 +352,15 @@ proc sftime {} {
 proc scaninfo {} {
     set result [scan info]
     set r1  [sample]
-    set l1 [split $r1 "="]
-    append result "," [lindex $l1 1]
+    set inf [string first = $r1]
+    if {$inf > 0} {
+       incr inf
+       set sa [string range $r1 $inf end]
+    } else {
+      set sa Unknown
+    }
+    regsub -all , $sa " " sam
+    append result "," $sam
     append result "," [sicstime]
     set r1 [lastscancommand]
     set l1 [split $r1 "="]