From f1e6d97ec294aaef228a308e62b9b39687e8f58a Mon Sep 17 00:00:00 2001
From: portmann <portmann>
Date: Mon, 18 May 2015 07:09:44 +0000
Subject: [PATCH] bug fix, rm set EGU empty_string, else EGU not shown

---
 ca | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/ca b/ca
index 91b5aa5..7721c5a 100755
--- a/ca
+++ b/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]\}