From 34d9e3b48b37202ceac9ca04239e7eb6cd8284f2 Mon Sep 17 00:00:00 2001 From: sans Date: Thu, 1 Dec 2022 16:31:33 +0100 Subject: [PATCH] fix strange behaviour when parmeter name starts with inf 'inf' is interpreted a floating point infinity on a drivable object x info -> run x inf therefore use 'hval $path' instead of 'result $sicscommand' to retrieve a nodes value in hdbItem --- tcl/startup/hdb.tcl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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 {