fix deletions from non-mediaroot paths

git-svn-id: file:///root/webif/svn/humax/pkg/src/webif/trunk@691 2a923420-c742-0410-a762-8d5b09965624
This commit is contained in:
hummypkg 2012-01-27 21:54:39 +00:00
parent f62904edb4
commit 909605b074

View File

@ -23,9 +23,10 @@ if {[system pkginst undelete]} {
proc bindir {file} {
global dustbin
set dir [file dirname $file]
regsub "^[system mediaroot]" $dir $dustbin dir
system mkdir_p $dir
return $dir
regsub "^[system mediaroot]" $dir $dustbin ndir
if {$dir eq $ndir} { set ndir $dustbin }
system mkdir_p $ndir
return $ndir
}
proc touch {file} {