michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-03-20 16:50:24 +00:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Correct return value for copying sub-dirs

Browse Source
This commit is contained in:
Jamie Cameron
2009-05-01 17:25:31 +00:00
parent fcd5534e54
commit 886e732b7a
1 changed files with 11 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
useradmin/user-lib.pl
View File

@@ -1115,7 +1115,17 @@ elsif (-l $_[0] && !$config{'copy_symlinks'}) {
elsif (-d $_[0]) {
# A directory .. copy it recursively
&system_logged("cp -Rp ".quotemeta($_[0])." ".quotemeta("$_[1]/$base")." >/dev/null 2>/dev/null");
@rv = glob("$_[1]/$base/*");
local $glob = "$_[1]/$base/*";
while(1) {
local @g = glob($glob);
if (@g) {
push(@rv, @g);
$glob .= "/*";
}
else {
last;
}
}
}
else {
# Just a normal file .. copy it