bug fix, rm set EGU empty_string, else EGU not shown

ca

@@ -2,12 +2,12 @@
 
 # ca* by Dirk Zimoch
 # $Source: /cvs/G/EPICS/App/scripts/ca,v $
-# $Date: 2015/04/04 20:45:05 $
+# $Date: 2015/05/18 07:09:44 $
 
 regsub -all {\$} {ca* by Dirk Zimoch
 $Source: /cvs/G/EPICS/App/scripts/ca,v $
-$Revision: 1.28 $
-$Date: 2015/04/04 20:45:05 $} {} version
+$Revision: 1.29 $
+$Date: 2015/05/18 07:09:44 $} {} version
 
 package require Tclx
 package require Epics
@@ -178,7 +178,6 @@ proc formatval {channel {value {}} {sevr {}} {stat {}} {time {}}} {
                 }
             }
             lappend formatted $val
-            set EGU ""
         }
         if {$SIZE > 1} {
             set formatted \{[join $formatted]\}