reset error message on good read and adjust code indent

r3026 | dcl | 2010-09-14 11:34:59 +1000 (Tue, 14 Sep 2010) | 2 lines
2010-09-14 11:34:59 +10:00
parent 33cfcefa8a
commit f776135904
1 changed files with 34 additions and 31 deletions
--- a/site_ansto/instrument/config/environment/temperature/sct_oxford_itc.tcl
+++ b/site_ansto/instrument/config/environment/temperature/sct_oxford_itc.tcl
@@ -75,6 +75,9 @@ debug_log "rdValue $tc_root ITC503-a result=$data"
            set rslt [scan $data %f data]
 debug_log "rdValue $tc_root ITC503-b result=$data"
          }
+          if { [hpropexists [sct] geterror] } {
+            hdelprop [sct] geterror
+          }
          if {$data != [sct oldval]} {
            sct oldval $data
            sct update $data