From: Wayne Davison Date: Fri, 13 May 2005 00:25:25 +0000 (+0000) Subject: Fixed a couple problems in restore_cvsdir(). X-Git-Url: https://mattmccutchen.net/rsync/rsync-patches.git/commitdiff_plain/64efc51eb1db9487252eae268597651db34ece65 Fixed a couple problems in restore_cvsdir(). --- diff --git a/verify-patches b/verify-patches index 8245bdf..28d37b9 100755 --- a/verify-patches +++ b/verify-patches @@ -263,18 +263,20 @@ sub restore_cvsdir return unless $has_dependencies; $has_dependencies = 0; + chdir('cvsdir') or die $!; foreach (glob('*.~[1-9]~'), glob('*/*.~[1-9]~')) { my $fn; ($fn = $_) =~ s/\.~1~$//; if ($fn eq $_) { unlink($_); - } elsif (-r $fn) { - rename($_, $fn); + } elsif (-r $_) { + rename($_, $fn); } else { unlink($_); unlink($fn); } } + chdir('..') or die $!; } sub usage