hummypkg/webif
5
3
Fork 4
Code Issues Pull Requests Releases 1 Activity

stop auto recursion into bin

Browse Source 
git-svn-id: file:///root/webif/svn/humax/pkg/src/webif/trunk@1373 2a923420-c742-0410-a762-8d5b09965624
This commit is contained in:
hummypkg 2013-01-27 21:23:16 +00:00
parent 1964f4dfad
commit 52939392ba
2 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
CONTROL/control
View File

@ -1,7 +1,7 @@
Package: webif Package: webif
Priority: optional Priority: optional
Section: web Section: web
Version: 0.11.0-1 Version: 0.11.0-2
Architecture: mipsel Architecture: mipsel
Maintainer: af123@hummypkg.org.uk Maintainer: af123@hummypkg.org.uk
Depends: webif-channelicons(>=1.0.4-1),mongoose(>=3.0-7),jim(>=0.73-1),jim-oo,jim-sqlite3(>=0.73-1),jim-cgi(>=0.6),jim-binary,service-control(>=1.2),busybox(>=1.20.2-1),lsof,epg(>=1.0.9-1),hmt(>=1.1.10),ssmtp,anacron,trm(>=1.1),openssl-command,nicesplice,id3v2,file,rsvsync(>=1.0.2),webif-charts(>=1.2),stripts(>=1.1.2),smartmontools,tmenu(>=1.05) Depends: webif-channelicons(>=1.0.4-1),mongoose(>=3.0-7),jim(>=0.73-1),jim-oo,jim-sqlite3(>=0.73-1),jim-cgi(>=0.6),jim-binary,service-control(>=1.2),busybox(>=1.20.2-1),lsof,epg(>=1.0.9-1),hmt(>=1.1.10),ssmtp,anacron,trm(>=1.1),openssl-command,nicesplice,id3v2,file,rsvsync(>=1.0.2),webif-charts(>=1.2),stripts(>=1.1.2),smartmontools,tmenu(>=1.05)

10
var/mongoose/lib/bin/auto
View File

@ -8,7 +8,7 @@ set testing 0
proc dsc {} { proc dsc {} {
lassign [system diskspace] x x perc lassign [system diskspace] x x perc
if {$perc > 90} { if {$perc > 90} {
puts "Insufficient disk space, terminating." puts "Insufficient disk space ($perc%), terminating."
exit exit
} }
} }
@ -242,11 +242,17 @@ proc mpg {dir} {
} }
proc scan {dir attr {force 0}} {{indent 0}} { proc scan {dir attr {force 0}} {{indent 0}} {
global dustbin
incr indent 2 incr indent 2
if {$::testing} { puts "[string repeat " " $indent]\[$dir]" } if {$::testing} { puts "[string repeat " " $indent]\[$dir]" }
if {[string match {\[*} $dir]} continue #if {[string match {\[*} $dir]} continue
if {$dir eq $::dustbin} {
puts "Dustbin, skipping."
return
}
dsc dsc