--- misc/scripts/shell/change_cvs_author.pl 2001/12/09 02:33:25 1.1 +++ misc/scripts/shell/change_cvs_author.pl 2002/01/08 17:39:38 1.2 @@ -28,7 +28,7 @@ sub checkdir() { # look at each item foreach my $item (@contents) { # lets ignore . and .. :) - if($item =~ /^.$/ || $item =~ /^..$/) { + if($item =~ /^\.$/ || $item =~ /^\.\.$/) { next; } # if it ends in ,v it's an RCS file!