Merge branch 'master' of gitlab.psi.ch-samenv:samenv/sea

tcl/drivers/ccu4ext.tcl

@@ -72,7 +72,6 @@ proc ccu4ext::changestate {type state} {
       cc $auto 1
     }
     fill {
-      clientlog FILL$type
       cc $cmd 1
       cc $auto 1
     }

tcl/drivers/dil12.tcl

@@ -264,6 +264,7 @@ proc stdConfig::dil12 args {
   }
   hset $name/heatermode 0
   dolater 0 hset $name/autoprop/integ 5
+  dolater 0 apply_dilpars
 }
 
 proc dil12::check_set {} {

tcl/drivers/dilpars.tcl

@@ -0,0 +1,18 @@
+# any parameter to be entered by hand
+namespace eval dilpars {} {
+}
+
+proc stdConfig::dilpars {args} {
+  variable hostport none
+  variable name
+  controller syncedprot
+
+  scanargs $args var -circulateflow 4 -condenseflow 8
+
+  obj dummy -none
+  kids hidden {
+    node condenseflow par $condenseflow
+    node circulateflow par $circulateflow
+  }
+  dolater 0 apply_dilargs
+}