diff --git a/tcl/ccr4.config b/tcl/ccr4.config
new file mode 100644
index 0000000..fc325b8
--- /dev/null
+++ b/tcl/ccr4.config
@@ -0,0 +1,15 @@
+deviceDesc = sumitomo closed cycle cryostat from IFE norway
+
+defineTemperature tt
+GraphAdd tt K T_main
+makenv tt -driver [lsdriver] {
+  lsc_sensor tm A -sensor dt-670 -sensorname main
+  lsc_loop set -loop 1 -channel A -maxheater 100W -resist 25Ohm
+}
+tt set/limit 310
+tt set/prop 25
+tt set/integ 10
+catch {
+  enableTable 0
+}
+
diff --git a/tcl/drivers/secop_4.tcl b/tcl/drivers/secop_4.tcl
index 0eaf539..554231c 100644
--- a/tcl/drivers/secop_4.tcl
+++ b/tcl/drivers/secop_4.tcl
@@ -610,7 +610,7 @@ proc secop::update_ {} {
         }
         set writestatus [silent done hgetpropval $objpath writestatus]
         if {$value < 100 || $value >= 400} { # error
-          updateerror $objpath $text_value
+          # updateerror $objpath $text_value
           catch {
             updateerror $objpath/target $text_value
           }
@@ -618,12 +618,12 @@ proc secop::update_ {} {
             hsetprop $objpath status posfault
           }
         } else {
-          if {[silent idle hgetpropval $objpath status] eq "run" && $writestatus ne "done"
-              && ($value < 300 || $value >= 390)} {
-            clientput "$objpath/target changed, but status not BUSY: $value $text_value ($writestatus)"
-            set value 300
-            set text_value "target changed ($text_value)"
-          }
+          # if {[silent idle hgetpropval $objpath status] eq "run" && $writestatus ne "done"
+          #     && ($value < 300 || $value >= 390)} {
+          #   clientput "$objpath/target changed, but status not BUSY: $value $text_value ($writestatus)"
+          #   set value 300
+          #   set text_value "target changed ($text_value)"
+          # }
           if {$value < 300 || $value >= 390} { # not busy or finalizing
             hsetprop $objpath status idle
           }
diff --git a/tcl/ma02.config b/tcl/ma02.config
index a0389d1..97097d7 100644
--- a/tcl/ma02.config
+++ b/tcl/ma02.config
@@ -19,7 +19,7 @@ tt set/integ 10
 
 makeCCU4 ma02 nv n2
 
-hupdate /nv/set 1.8
+hupdate /nv/set 1.2
 
 makeIps -limit 1.8 -startRamp 0.5 -port ma02-ts:3002
 
diff --git a/tcl/startup/hdb.tcl b/tcl/startup/hdb.tcl
index 7882953..953c397 100644
--- a/tcl/startup/hdb.tcl
+++ b/tcl/startup/hdb.tcl
@@ -102,7 +102,8 @@ proc hdbItem {path title} {
           return
         } else {
           set cmd2 ""
-          if {[catch {set val [result $cmd]} msg]} {
+          # using {set val [result $cmd]} will have strange effects: 'xatto info' is like 'run xatto inf'!
+          if {[catch {set val [hval $path]} msg]} {
             if {$msg eq "ERROR: not read yet"} {
               set val ""
             } else {