let recorders get the frappy cfg names (lowercase)
This commit is contained in:
@ -253,6 +253,54 @@ proc check_config {service args} {
|
||||
return [check_or_do 0 $service $args]
|
||||
}
|
||||
|
||||
proc activate_stick {} {
|
||||
set name [hval /device/stick_label]
|
||||
frappy_config stick secop.stick
|
||||
# stick_label was changed - set it again
|
||||
device stick_label $name
|
||||
}
|
||||
|
||||
proc activate_addon {} {
|
||||
frappy_config addons secop.addon
|
||||
}
|
||||
|
||||
proc sea_recorder {main stick addons} {
|
||||
set defer 0
|
||||
if {$main ne "0"} {
|
||||
lassign [split $main /] uri name
|
||||
if {$name eq ""} { set name $uri }
|
||||
samenv none
|
||||
cfg_env makeitem _secop $uri
|
||||
frappy_config stick secop.config
|
||||
device name_label $name
|
||||
set defer _secop
|
||||
}
|
||||
if {$stick ne "0"} {
|
||||
lassign [split $stick /] uri name
|
||||
if {$name eq ""} { set name $uri }
|
||||
addon stick none
|
||||
cfg_env makeitem _secopstick $uri
|
||||
device stick_label $name
|
||||
if {$defer eq "0"} {
|
||||
set defer _secopstick
|
||||
frappy_config stick secop.stick
|
||||
} else {
|
||||
hsetprop /sics/$defer activate_stick 1
|
||||
}
|
||||
}
|
||||
if {$addons ne "0"} {
|
||||
lassign [split $addons /] uri name
|
||||
addon delete secop
|
||||
cfg_env makeitem _secopaddon $uri
|
||||
# device addon_label $name
|
||||
if {$defer eq "0"} {
|
||||
frappy_config addons secop.addon
|
||||
} else {
|
||||
hsetprop /sics/$defer activate_addon 1
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
proc frappy_remove {service} {
|
||||
set cfgs [silent "" result device frappy_$service]
|
||||
set config ""
|
||||
|
Reference in New Issue
Block a user