forked from hummypkg/webif
fix stripped icon
git-svn-id: file:///root/webif/svn/humax/pkg/src/webif/trunk@1070 2a923420-c742-0410-a762-8d5b09965624
This commit is contained in:
parent
9d8d630b07
commit
51db7b1e36
@ -1,9 +1,9 @@
|
|||||||
Package: webif
|
Package: webif
|
||||||
Priority: optional
|
Priority: optional
|
||||||
Section: web
|
Section: web
|
||||||
Version: 0.9.12
|
Version: 0.9.12-2
|
||||||
Architecture: mipsel
|
Architecture: mipsel
|
||||||
Maintainer: af123@hummypkg.org.uk
|
Maintainer: af123@hummypkg.org.uk
|
||||||
Depends: webif-channelicons(>=1.0.1),mongoose(>=3.0-7),jim(>=0.73-1),jim-oo,jim-sqlite3(>=0.73),jim-cgi(>=0.5),service-control(>=1.2),busybox(>=1.19.3-1),lsof,epg(>=1.0.9),hmt(>=1.1.6),ssmtp,anacron,trm,openssl-command,nicesplice,id3v2,file,rsvsync(>=1.0.2),webif-charts(>=1.2),stripts(>=1.0.3)
|
Depends: webif-channelicons(>=1.0.1),mongoose(>=3.0-7),jim(>=0.73-1),jim-oo,jim-sqlite3(>=0.73),jim-cgi(>=0.5),service-control(>=1.2),busybox(>=1.19.3-1),lsof,epg(>=1.0.9),hmt(>=1.1.6),ssmtp,anacron,trm,openssl-command,nicesplice,id3v2,file,rsvsync(>=1.0.2),webif-charts(>=1.2),stripts(>=1.0.4)
|
||||||
Suggests: ffmpeg,webif-iphone
|
Suggests: ffmpeg,webif-iphone
|
||||||
Description: An evolving web interface for the Humax.
|
Description: An evolving web interface for the Humax.
|
||||||
|
@ -17,16 +17,11 @@ foreach file [readdir -nocomplain $dir] {
|
|||||||
if {![string match {*.ts} $file]} { continue }
|
if {![string match {*.ts} $file]} { continue }
|
||||||
|
|
||||||
regsub -all {([\\["$])} [file rootname $file] {\\\1} xfile
|
regsub -all {([\\["$])} [file rootname $file] {\\\1} xfile
|
||||||
if {[catch {set perc [exec /mod/bin/stripts -Aq "$xdir/$xfile"]}]} {
|
if {[catch {set eit [exec /mod/bin/stripts -cq "$xdir/$xfile"]}]} {
|
||||||
continue
|
continue
|
||||||
}
|
}
|
||||||
if {[string match {*%} $perc]} {
|
|
||||||
set perc [string range $perc 0 end-1]
|
|
||||||
} else {
|
|
||||||
set perc 0
|
|
||||||
}
|
|
||||||
|
|
||||||
puts " \"$file\": $perc,"
|
puts " \"$file\": $eit,"
|
||||||
}
|
}
|
||||||
puts " \"dummy\": 0"
|
puts " \"dummy\": 0"
|
||||||
puts "}"
|
puts "}"
|
||||||
|
@ -187,6 +187,8 @@ proc scan {dir attr} {{indent 0}} {
|
|||||||
|
|
||||||
#puts "[string repeat " " $indent]\[$dir]"
|
#puts "[string repeat " " $indent]\[$dir]"
|
||||||
|
|
||||||
|
if {[string match {\[*} $dir]} continue
|
||||||
|
|
||||||
if {[file exists "$dir/.auto$attr"]} { $attr $dir }
|
if {[file exists "$dir/.auto$attr"]} { $attr $dir }
|
||||||
|
|
||||||
foreach entry [readdir -nocomplain $dir] {
|
foreach entry [readdir -nocomplain $dir] {
|
||||||
|
Loading…
Reference in New Issue
Block a user