Ticket #2910: enter into symlink to commpressed patch shows empty patch.
Signed-off-by: Andrew Borodin <aborodin@vmail.ru>
Этот коммит содержится в:
родитель
9b99f5b659
Коммит
9af54886d6
@ -380,25 +380,31 @@ sub copyin($$$) {
|
||||
or error "Can't write to archive";
|
||||
}
|
||||
|
||||
my $fin = $ARGV[1];
|
||||
|
||||
# resolve symlink
|
||||
while (-l $fin) {
|
||||
$fin = readlink $fin;
|
||||
}
|
||||
|
||||
if ($ARGV[0] eq 'list') {
|
||||
open I, myin($ARGV[1]).'|';
|
||||
list ($ARGV[1]);
|
||||
open I, myin($fin).'|';
|
||||
list ($fin);
|
||||
exit 0;
|
||||
} elsif ($ARGV[0] eq 'copyout') {
|
||||
open I, myin($ARGV[1])."|";
|
||||
open I, myin($fin)."|";
|
||||
copyout ($ARGV[2], $ARGV[3]);
|
||||
exit 0;
|
||||
} elsif ($ARGV[0] eq 'rm') {
|
||||
open I, myin($ARGV[1])."|";
|
||||
rm ($ARGV[1], $ARGV[2]);
|
||||
open I, myin($fin)."|";
|
||||
rm ($fin, $ARGV[2]);
|
||||
exit 0;
|
||||
} elsif ($ARGV[0] eq 'rmdir') {
|
||||
exit 0;
|
||||
} elsif ($ARGV[0] eq 'mkdir') {
|
||||
exit 0;
|
||||
} elsif ($ARGV[0] eq 'copyin') {
|
||||
copyin ($ARGV[1], $ARGV[2], $ARGV[3]);
|
||||
copyin ($fin, $ARGV[2], $ARGV[3]);
|
||||
exit 0;
|
||||
}
|
||||
exit 1;
|
||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user