Change schedule list to use svc.class instead of get_channel_attr_byhsvc #4

Merged
af123 merged 1 commits from :schedlist into master 2020-06-03 09:59:32 +00:00

View File

@ -2,7 +2,7 @@
package require cgi
source /mod/webif/lib/setup
require altrow rsv.class progressbar epg.class system.class
require altrow rsv.class progressbar epg.class system.class svc.class
noheader
set renderstart [clock milliseconds]
@ -256,9 +256,8 @@ proc eventrow {event {table TBL_RESERVATION}} {
[clock format $start \
-format {%a %d %b %Y %H:%M}]</a>"
if {$service_id != [$event get hsvc]} {
set ch [system strip [\
get_channel_attr_byhsvc \
$service_id szSvcName]]
set svc [svc load hsvc $service_id]
set ch [$svc get szSvcName]
puts "<img width=15 src=\"[\
epg channeliconpath $ch]\""
puts "title=\"$ch\" alt=\"$ch\">"