linse/sea
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

dbctrl: fix issue not fixed properly

Browse Source
This commit is contained in:
zolliker
2023-11-02 16:55:00 +01:00
parent 8a53c37bde
commit 3ea9b38051
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
tcl/drivers/trun.tcl
View File

@ -497,9 +497,10 @@ proc trun::read_run {} {
set now [DoubleTime] set now [DoubleTime]
set tr [silent none sct target] set tr [silent none sct target]
set prev_tr [silent $tr sct prev_tr] set prev_tr [silent $tr sct prev_tr]
sct prev_tr $tr
if {$tr eq "none"} { if {$tr eq "none"} {
set tr $tmain set tr $tmain
sct prev_tr $tr sct prev_tr $tmain
} else { } else {
set dif [expr $tr - $prev_tr] set dif [expr $tr - $prev_tr]
updateval_u [sct]/target $tr 0 updateval_u [sct]/target $tr 0