fix fix_stick_sensors

2023-10-30 14:56:11 +01:00
parent 325412e767
commit e5063b5693
1 changed files with 1 additions and 1 deletions
--- a/tcl/seacom.tcl
+++ b/tcl/seacom.tcl
@ -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 "" sctval $path]
+     set curv [sctval $path ""]
     if {$curv ne ""} {
       hset $path $curv
     }