diff --git a/tcl/drivers/ccu4.tcl b/tcl/drivers/ccu4.tcl index 1726313..7b86657 100644 --- a/tcl/drivers/ccu4.tcl +++ b/tcl/drivers/ccu4.tcl @@ -539,7 +539,13 @@ proc ccu4::update {} { set errvar [silent "" hgetpropval [sct]/$name errvar] if {$errvar ne ""} { set errval [hvali [sct]/$errvar] - if {$errval > 0} { + if {$errval == 1} { + # sens warm + updateval [sct]/$name -11 + } elseif {$errval == 3} { + # timeout + updateval [sct]/$name 111 + } elseif {$errval > 0} { hsetprop [sct]/$name geterror [lindex [split [hgetpropval [sct]/$errvar enum] ,] $errval] hupdate [sct]/$name $value } else {