diff --git a/CONTROL/control b/CONTROL/control index f38776e..855113d 100644 --- a/CONTROL/control +++ b/CONTROL/control @@ -1,7 +1,7 @@ Package: webif Priority: optional Section: web -Version: 0.9.1 +Version: 0.9.1-1 Architecture: mipsel Maintainer: af123@hummypkg.org.uk Depends: mongoose(>=3.0-7),jim(>=0.73-1),jim-oo,jim-sqlite3(>=0.73),jim-cgi(>=0.5),service-control,busybox(>=1.19.3-1),lsof,epg(>=1.0.8),hmt(>=1.1.4),ssmtp,anacron,trm,openssl-command,nicesplice,id3v2 diff --git a/var/mongoose/cgi-bin/browse.jim b/var/mongoose/cgi-bin/browse.jim index 9862dbb..f94e017 100755 --- a/var/mongoose/cgi-bin/browse.jim +++ b/var/mongoose/cgi-bin/browse.jim @@ -250,6 +250,11 @@ if {$parent ne ""} { } proc s_time {a b} { + global dir + + set a "$dir/$a" + set b "$dir/$b" + set ad [file isdirectory $a] set bd [file isdirectory $b] diff --git a/var/mongoose/lib/ts.class b/var/mongoose/lib/ts.class index 5a079d7..1bc954e 100644 --- a/var/mongoose/lib/ts.class +++ b/var/mongoose/lib/ts.class @@ -205,6 +205,7 @@ proc {ts renamegroup} {from to} { set ndir [file normalize $dir] if {![catch {set db [sqlite3.open $::dmsfile]}]} { + catch { set x [lindex [$db query {select mediaid from tblMedia where localUrl = '%s'} [file normalize $from]] 0] lassign $x key mediaid @@ -214,6 +215,7 @@ proc {ts renamegroup} {from to} { $db query {update tblMedia set title = '%s' where mediaid = %s} "{$to}.ts" $mediaid } + } $db close } }