forked from hummypkg/webif
Add missing $ for certain variable references
Missing $s invalidated attempts to check the length of title, synopsis, guidance.
This commit is contained in:
parent
d05f841bb4
commit
98ef6a876f
@ -296,21 +296,21 @@ ts method copy {dst} {
|
|||||||
}
|
}
|
||||||
|
|
||||||
ts method settitle {newtitle} {
|
ts method settitle {newtitle} {
|
||||||
if {[string length newtitle] > 48} { return }
|
if {[string length $newtitle] > 48} { return }
|
||||||
|
|
||||||
exec /mod/bin/hmt "+settitle=${newtitle}" $file
|
exec /mod/bin/hmt "+settitle=${newtitle}" $file
|
||||||
set title $newtitle
|
set title $newtitle
|
||||||
}
|
}
|
||||||
|
|
||||||
ts method setsynopsis {newsynopsis} {
|
ts method setsynopsis {newsynopsis} {
|
||||||
if {[string length newsynopsis] > 252} { return }
|
if {[string length $newsynopsis] > 252} { return }
|
||||||
|
|
||||||
exec /mod/bin/hmt "+setsynopsis=${newsynopsis}" $file
|
exec /mod/bin/hmt "+setsynopsis=${newsynopsis}" $file
|
||||||
set synopsis $newsynopsis
|
set synopsis $newsynopsis
|
||||||
}
|
}
|
||||||
|
|
||||||
ts method setguidance {newguidance} {
|
ts method setguidance {newguidance} {
|
||||||
if {[string length newguidance] > 48} { return }
|
if {[string length $newguidance] > 48} { return }
|
||||||
|
|
||||||
if {$newguidance eq ""} {
|
if {$newguidance eq ""} {
|
||||||
exec /mod/bin/hmt "-guidance" $file
|
exec /mod/bin/hmt "-guidance" $file
|
||||||
|
Loading…
Reference in New Issue
Block a user