More fixes for expr weirdness

webif/html/diag/mux.jim

@@ -15,8 +15,7 @@ if {[catch {set db [sqlite3.open /var/lib/humaxtv/channel.db]} msg]} {
 pkg loadmuxdb
 
 proc f2c {frequency} {
-	set ch int($((($frequency / 1000) - 303.25) / 8))
-	return [expr {int($ch)}]
+	return $(int((($frequency / 1000) - 303.25) / 8))
 }
 
 proc svc2mux {svcid mux} {

webif/html/sched/visual/index.jim

@@ -23,7 +23,7 @@ lmap i \
 #set svcmap [lreverse $hmap]
 
 proc lsum {l} {
-	expr [join $l +] + 0
+	expr [join [linsert $l 0 0] +]
 }
 
 proc pop_event {} {

webif/html/xepg/index.jim

@@ -201,10 +201,11 @@ puts "</div>"
 ######################################################################
 # Events
 
+if {[catch {set stt2 [expr {$stt + 0}]}]} { set stt2 0 }
 puts "
 <script type=text/javascript>
 var hours = $hours;
-var stt = [expr {$stt + 0}];
+var stt = $stt2;
 var nowoffset = $offset;
 </script>
 "