From: Junio C Hamano <junkio@cox.net>
Date: Sun, 29 Apr 2007 07:31:14 +0000 (-0700)
Subject: Fix import-tars fix.
X-Git-Tag: v1.5.1.3~8
X-Git-Url: https://git.tokkee.org/?a=commitdiff_plain;h=d0c32b63394992f8dd083a4f2f380ab190dbb2ca;p=git.git

Fix import-tars fix.

This heeds advice from our resident Perl expert to make sure
the script is not confused with a string that ends with /\n

Signed-off-by: Junio C Hamano <junkio@cox.net>
---

diff --git a/contrib/fast-import/import-tars.perl b/contrib/fast-import/import-tars.perl
index e84647770..82a90429c 100755
--- a/contrib/fast-import/import-tars.perl
+++ b/contrib/fast-import/import-tars.perl
@@ -52,7 +52,7 @@ foreach my $tar_file (@ARGV)
 			Z8 Z1 Z100 Z6
 			Z2 Z32 Z32 Z8 Z8 Z*', $_;
 		last unless $name;
-		next if $name =~ '/$';
+		next if $name =~ m{/\z};
 		$mode = oct $mode;
 		$size = oct $size;
 		$mtime = oct $mtime;