diff options
| author | Raphaël Hertzog <hertzog@debian.org> | 2011-01-06 21:59:44 +0100 |
|---|---|---|
| committer | Raphaël Hertzog <hertzog@debian.org> | 2011-01-06 21:59:44 +0100 |
| commit | 2df6e3351f79c96c80f5869499a5cb4d59f2943f (patch) | |
| tree | c8d62cad5ec96ad1bec41c7ceae771bbcd318052 /scripts/Dpkg/Source/Archive.pm | |
| parent | 930bb774c5aeb2a2a083deb7b92432a7b7ab9a35 (diff) | |
| parent | 1d872bf8ed2a7976c901aff20bf2bd6c20660f65 (diff) | |
| download | dpkg-2df6e3351f79c96c80f5869499a5cb4d59f2943f.tar.gz | |
Merge commit '1.15.8.8'
Diffstat (limited to 'scripts/Dpkg/Source/Archive.pm')
| -rw-r--r-- | scripts/Dpkg/Source/Archive.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/Dpkg/Source/Archive.pm b/scripts/Dpkg/Source/Archive.pm index 921c76e6f..5e040cad4 100644 --- a/scripts/Dpkg/Source/Archive.pm +++ b/scripts/Dpkg/Source/Archive.pm @@ -147,7 +147,7 @@ sub extract { closedir(D); my $done = 0; erasedir($dest); - if (scalar(@entries) == 1 && -d "$tmp/$entries[0]") { + if (scalar(@entries) == 1 && ! -l "$tmp/$entries[0]" && -d _) { rename("$tmp/$entries[0]", $dest) || syserr(_g("Unable to rename %s to %s"), "$tmp/$entries[0]", $dest); |