diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-11-08 16:41:19 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-11-08 16:41:19 +0000 |
commit | 262c6d17a23ee7047c25e60310b0ebbcc39cb40a (patch) | |
tree | 6cc047465b33cfe3e8643e2d19a6b211026d209f /MDK | |
parent | 2fbc8a40a2c119717aae566a19ac8512370c55d6 (diff) | |
download | perl-MDK-Common-262c6d17a23ee7047c25e60310b0ebbcc39cb40a.tar perl-MDK-Common-262c6d17a23ee7047c25e60310b0ebbcc39cb40a.tar.gz perl-MDK-Common-262c6d17a23ee7047c25e60310b0ebbcc39cb40a.tar.bz2 perl-MDK-Common-262c6d17a23ee7047c25e60310b0ebbcc39cb40a.tar.xz perl-MDK-Common-262c6d17a23ee7047c25e60310b0ebbcc39cb40a.zip |
fix cp_with_option which called cp_af() recursively, loosing the specific options
Diffstat (limited to 'MDK')
-rw-r--r-- | MDK/Common/File.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/MDK/Common/File.pm b/MDK/Common/File.pm index 3e28689..26923a4 100644 --- a/MDK/Common/File.pm +++ b/MDK/Common/File.pm @@ -180,7 +180,7 @@ sub cp_with_option { } } elsif (-d $src) { -d $dest or mkdir $dest, (stat($src))[2] or die "mkdir: can't create directory $dest: $!\n"; - cp_af(glob_($src), $dest); + cp_with_option($option, glob_($src), $dest); } elsif ((-b $src || -c $src) && $keep_special) { my @stat = stat($src); require MDK::Common::System; |