fix error with non-ts files

git-svn-id: file:///root/webif/svn/pkg/webif/trunk@3439 2a923420-c742-0410-a762-8d5b09965624
This commit is contained in:
hummypkg 2016-12-19 11:05:19 +00:00
parent 4adc26d2f2
commit 097ed2d74c
3 changed files with 8 additions and 4 deletions

View File

@ -1,7 +1,7 @@
Package: webif
Priority: optional
Section: web
Version: 1.3.4-3
Version: 1.3.4-4
Architecture: mipsel
Maintainer: af123@hpkg.tv
Depends: tcpfix,webif-channelicons(>=1.1.24),lighttpd(>=1.4.39-1),jim(>=0.77),jim-oo(>=0.77),jim-sqlite3(>=0.76),jim-cgi(>=0.7-1),jim-binary(>=0.76),service-control(>=2.3),busybox(>=1.20.2-1),lsof(>=4.87),epg(>=1.2.3),hmt(>=2.0.10),ssmtp,cron-daemon(>=1.18.3-3),at(>=3.1.18),anacron,trm(>=1.1),openssl-command,nicesplice,id3v2,file,rsvsync(>=1.1.9),webif-charts(>=1.2-1),stripts(>=1.2.5-3),tmenu(>=1.08),ffmpeg,id3v2,multienv(>=1.6),tcpping(>=1.1),e2fsprogs,wireless-tools(>=29-1),dbupdate,recmon(>=2.0.7),hwctl,nugget(>=0.95),sqlite3(>=3.15.1)

View File

@ -217,9 +217,11 @@ proc entry {file} {{i 0}} {
}
# Queued
set queued [queue status $ts]
if {$queued ne ""} {
icon "/img/queueps.png" "Queued for $queued"
if {$type eq "ts"} {
set queued [queue status $ts]
if {$queued ne ""} {
icon "/img/queueps.png" "Queued for $queued"
}
}
# Opt+ button

View File

@ -128,6 +128,8 @@ proc {queue delete_by_id} {id} {
}
proc {queue status} {ts} {
if {$ts eq "0"} { return "" }
set db [queue dbhandle]
set ret [$db query {