From 98ef6a876f6f7613b08510147f89eb8420fbc1e8 Mon Sep 17 00:00:00 2001 From: df Date: Thu, 31 Dec 2020 15:22:42 +0000 Subject: [PATCH] Add missing $ for certain variable references Missing $s invalidated attempts to check the length of title, synopsis, guidance. --- webif/lib/ts.class | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/webif/lib/ts.class b/webif/lib/ts.class index b998d93..83de168 100644 --- a/webif/lib/ts.class +++ b/webif/lib/ts.class @@ -296,21 +296,21 @@ ts method copy {dst} { } ts method settitle {newtitle} { - if {[string length newtitle] > 48} { return } + if {[string length $newtitle] > 48} { return } exec /mod/bin/hmt "+settitle=${newtitle}" $file set title $newtitle } ts method setsynopsis {newsynopsis} { - if {[string length newsynopsis] > 252} { return } + if {[string length $newsynopsis] > 252} { return } exec /mod/bin/hmt "+setsynopsis=${newsynopsis}" $file set synopsis $newsynopsis } ts method setguidance {newguidance} { - if {[string length newguidance] > 48} { return } + if {[string length $newguidance] > 48} { return } if {$newguidance eq ""} { exec /mod/bin/hmt "-guidance" $file