diff --git a/ca b/ca index 3012ede..fb98f10 100755 --- a/ca +++ b/ca @@ -2,12 +2,12 @@ # ca* by Dirk Zimoch # $Source: /cvs/G/EPICS/App/scripts/ca,v $ -# $Date: 2013/04/16 10:00:17 $ +# $Date: 2013/04/16 10:12:11 $ regsub -all {\$} {ca* by Dirk Zimoch $Source: /cvs/G/EPICS/App/scripts/ca,v $ -$Revision: 1.23 $ -$Date: 2013/04/16 10:00:17 $} {} version +$Revision: 1.24 $ +$Date: 2013/04/16 10:12:11 $} {} version proc printHelp {} { puts {usage: caget [flags] [ ...]} @@ -138,7 +138,7 @@ proc formatval {channel {value {}} {sevr {}} {stat {}} {time {}}} { } } if {$TYPE == "DBF_ENUM" && \ - ([lsearch $flags "-int"] != -1 || [lsearch $flags "-hex"] != -1)} { + ([lsearch $flags "-int"] != -1 || [lsearch $flags "-num"] != -1 || [lsearch $flags "-hex"] != -1)} { set v [lsearch $ENUM $val] if {$v != -1} {set val $v} set TYPE "DBF_INT"