29 lines
665 B
Plaintext
Executable File
29 lines
665 B
Plaintext
Executable File
#!/mod/bin/jimsh
|
|
# mymsman 151008
|
|
|
|
package require cgi
|
|
source /mod/webif/lib/setup
|
|
require settings.class
|
|
|
|
httpheader
|
|
|
|
|
|
set mute [cgi_get chaseget_mute no ]
|
|
set status [cgi_get chaseget_status no ]
|
|
set standby_start1 [cgi_get chaseget_standby_start1 ""]
|
|
set standby_end1 [cgi_get chaseget_standby_end1 ""]
|
|
|
|
set val 1
|
|
if {$mute ne "yes"} { set val 0 }
|
|
[settings new] _nval_setting "chaseget_mute" $val
|
|
|
|
set val 1
|
|
if {$status ne "yes"} { set val 0 }
|
|
[settings new] _nval_setting "chaseget_status" $val
|
|
|
|
[settings new] _tval_setting "chaseget_standby_start1" $standby_start1
|
|
[settings new] _tval_setting "chaseget_standby_end1" $standby_end1
|
|
|
|
puts "Settings saved."
|
|
|