Merge pull request 'Change schedule list to use svc.class instead of get_channel_attr_byhsvc' (#4) from MymsMan/webif:schedlist into master
This commit is contained in:
commit
1b5472a141
@ -2,7 +2,7 @@
|
|||||||
|
|
||||||
package require cgi
|
package require cgi
|
||||||
source /mod/webif/lib/setup
|
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
|
noheader
|
||||||
set renderstart [clock milliseconds]
|
set renderstart [clock milliseconds]
|
||||||
@ -256,9 +256,8 @@ proc eventrow {event {table TBL_RESERVATION}} {
|
|||||||
[clock format $start \
|
[clock format $start \
|
||||||
-format {%a %d %b %Y %H:%M}]</a>"
|
-format {%a %d %b %Y %H:%M}]</a>"
|
||||||
if {$service_id != [$event get hsvc]} {
|
if {$service_id != [$event get hsvc]} {
|
||||||
set ch [system strip [\
|
set svc [svc load hsvc $service_id]
|
||||||
get_channel_attr_byhsvc \
|
set ch [$svc get szSvcName]
|
||||||
$service_id szSvcName]]
|
|
||||||
puts "<img width=15 src=\"[\
|
puts "<img width=15 src=\"[\
|
||||||
epg channeliconpath $ch]\""
|
epg channeliconpath $ch]\""
|
||||||
puts "title=\"$ch\" alt=\"$ch\">"
|
puts "title=\"$ch\" alt=\"$ch\">"
|
||||||
|
Loading…
Reference in New Issue
Block a user