visibility (used for scc.config humidity chamber)
This commit is contained in:
17
tcl/startup/visibility.tcl
Normal file
17
tcl/startup/visibility.tcl
Normal file
@ -0,0 +1,17 @@
|
||||
proc visibilityLayout args {
|
||||
Group visibility "visibility"
|
||||
}
|
||||
|
||||
proc visibilityGroup {} {
|
||||
global shown_groups
|
||||
if {[info exists shown_groups(expertMode)]} {
|
||||
Group expertMode "expert mode is on"
|
||||
} else {
|
||||
Group expertMode "expert mode is off"
|
||||
}
|
||||
}
|
||||
|
||||
proc expertModeGroup {} {
|
||||
Label expert items visible
|
||||
}
|
||||
|
Reference in New Issue
Block a user