forked from hummypkg/sweeper
update
This commit is contained in:
parent
97aef7f162
commit
efeea3fb6a
@ -1,7 +1,7 @@
|
||||
Package: sweeper
|
||||
Priority: optional
|
||||
Section: misc
|
||||
Version: 1.0.6
|
||||
Version: 1.0.8
|
||||
Architecture: mipsel
|
||||
Maintainer: af123@hummypkg.org.uk
|
||||
Depends: webif(>=1.0.5-5)
|
||||
|
@ -224,6 +224,25 @@ proc ::sweeper::folder_action {ts cmds} {
|
||||
|
||||
switch $cmd {
|
||||
preserve { return 1 }
|
||||
movecreate -
|
||||
move {
|
||||
set rest [::sweeper::expand $ts $rest]
|
||||
if {![file isdirectory "$root/$rest"]} {
|
||||
if {$cmd eq "move"} {
|
||||
log " ... No such directory $root/$rest" 2
|
||||
return 1
|
||||
}
|
||||
system mkdir_p "$root/$rest"
|
||||
if {![file isdirectory "$root/$rest"]} {
|
||||
log "Error creating directory $root/$rest" 1
|
||||
return 1
|
||||
} else {
|
||||
log " ... created directory $root/$rest" 2
|
||||
}
|
||||
}
|
||||
::sweeper:folder_merge $folder "$root/$rest"
|
||||
return 1
|
||||
}
|
||||
fileundercreate -
|
||||
fileunder {
|
||||
if {![file isdirectory "$root/$rest"]} {
|
||||
|
Loading…
Reference in New Issue
Block a user