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

haake: change running to pumprunning

Browse Source
This commit is contained in:
l_samenv
2023-10-30 14:55:35 +01:00
parent 6ee460c2bd
commit 912d059452
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
tcl/startup/haake.tcl
View File

@ -8,7 +8,7 @@ proc makeHaake {{name thermostat} {with2sensors 0}} {
proc haakeLayout {{name ""} args} { proc haakeLayout {{name ""} args} {
if {[string compare [sicsdescriptor th] notfound] == 0} return if {[string compare [sicsdescriptor th] notfound] == 0} return
set reset 1 set reset 1
if {! [result th running]} { if {! [result th pumprunning]} {
Style Warning Style Warning
Label pump not running Label pump not running
NoNewline NoNewline
@ -61,7 +61,7 @@ proc haakeLayout {{name ""} args} {
set reset 0 set reset 0
} }
Newline Newline
CheckBox "pump running" "th running" CheckBox "pump running" "th pumprunning"
CheckBox "confirm alarm" "th reset/$reset" CheckBox "confirm alarm" "th reset/$reset"
Tip "check this if an external sample sensor is used" Tip "check this if an external sample sensor is used"
if {[result th with2sensors] >= 0} { if {[result th with2sensors] >= 0} {