Fix expression in expression errors

webif/html/browse/crop/execute.jim

@@ -50,7 +50,7 @@ set cmd [list /mod/bin/nicesplice \
 	-out "$dir/$shname"]
 
 if {$invert} {
-	if {$([llength $bookmarks] % 2) != 0} {
+	if {([llength $bookmarks] % 2) != 0} {
 		lappend bookmarks [$ts duration 1]
 	}
 	foreach k [array names bookmarks] {

webif/html/browse/thumbnail/index.jim

@@ -71,7 +71,7 @@ puts "<div style=\"width=100%; text-align: center\">
 <tr>
 "
 
-for {set i $($start + 0.0}) {$i <= $limit} {set i $($i + 0.5)} {
+for {set i $($start + 0.0)} {$i <= $limit} {set i $($i + 0.5)} {
 	lappend times $i
 	puts "<th style=\"text-align: center\">
 	    @ <span class=mark>$i</span>s</th>"

webif/html/diag/disk.jim

@@ -84,7 +84,7 @@ proc flags {val} {
 	set f ""
 	set fx ""
 	loop i 0 [llength $flaglist] {
-		if {$($val & (1 << $i))} {
+		if {$val & (1 << $i)} {
 			append f [lindex $flaglist $i]
 			append fx "[lindex $flagdescr $i]\n"
 		} else {
@@ -135,7 +135,7 @@ foreach line [split $msg "\n"] {
 	set left ""
 	if {$flags eq ""} { set flags 0 }
 	if {$id ni $nolife &&
-	    $($flags & 0x18) == 0x10 && $val == $worst && $val <= 100 &&
+	    ($flags & 0x18) == 0x10 && $val == $worst && $val <= 100 &&
 	    $thresh < 100} {
 		# Event counter which is not a rate and has not regressed.
 		set notes ""

webif/html/sched/list/index.jim

@@ -289,7 +289,7 @@ proc eventrow {event {table TBL_RESERVATION}} {
 			foreach e $elist {
 				lassign $e service_id start end event_id
 				if {$start == $s} continue
-				if {[incr i] == $max && $($c - $i) > 1} {
+				if {[incr i] == $max && ($c - $i) > 1} {
 				    puts "<div class=\"hidden moretoshowc\">"
 				} else {
 				    puts "<br>"

webif/html/xepg/index.jim

@@ -40,7 +40,7 @@ set stt [cgi_get stt $now]
 set dst $($now - $stt)
 if {$dst >= 0 && $dst < 1800} {
 	set current 1
-} elseif { $stt < $(int ($now / 86400) * 86400) } {
+} elseif { $stt < (int ($now / 86400) * 86400) } {
 	set stt $now
 	set current 0
 } else {
@@ -124,7 +124,7 @@ for {set i 0} {$i < 24} {incr i} {
 
 	if {$i == $starthour} {
 		append xclass " tjstart"
-	} elseif {$i > $starthour && $i < $($starthour + $hours)} {
+	} elseif {$i > $starthour && $i < ($starthour + $hours)} {
 		append xclass " tjother"
 	}