diff options
author | Junio C Hamano <junkio@cox.net> | 2007-04-29 00:31:14 -0700 |
---|---|---|
committer | Junio C Hamano <junkio@cox.net> | 2007-04-29 01:34:59 -0700 |
commit | d0c32b63394992f8dd083a4f2f380ab190dbb2ca (patch) | |
tree | f586fd07a15cbf503e00cc1e39962baafca0dd98 /contrib | |
parent | 2342c4ee1437277a36c07246ab577a520dab588b (diff) | |
download | git-d0c32b63394992f8dd083a4f2f380ab190dbb2ca.tar.gz git-d0c32b63394992f8dd083a4f2f380ab190dbb2ca.tar.xz |
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>
Diffstat (limited to 'contrib')
-rwxr-xr-x | contrib/fast-import/import-tars.perl | 2 |
1 files changed, 1 insertions, 1 deletions
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; |