diff --git a/tcl/seacom.tcl b/tcl/seacom.tcl
index b1bfb82..260c381 100644
--- a/tcl/seacom.tcl
+++ b/tcl/seacom.tcl
@@ -628,7 +628,7 @@ proc stick_sensors {sensor1 sensor2} {
   source config/stick.list
   if {[string match "code*" $sensor2]} {
     set code [lindex [split $sensor2=0 =] 1]
-    set table_code [silent -1 set stick_cfgtable($stick_name)]
+    set table_code [silent 0 set stick_cfgtable($stick_name)]
     if {$table_code != $code} {
       clientput "ERROR: code $code in $stick_name.stick does not match value from config/sticklist: $table_code"
     }
@@ -655,7 +655,7 @@ proc stick_sensors {sensor1 sensor2} {
 proc fix_stick_sensors {} {
   # fix stick sensors
   foreach path {/tt/ts/curve /tt/ts_2/curve} {
-     set curv [silent "" hval $path]
+     set curv [silent "" sctval $path]
      if {$curv ne ""} {
        hset $path $curv
      }