[PATCH] git-svn: show progress in working_head_info()

[Ramkumar Ramachandra <artagnon@gmail.com>]

The working_head_info routine takes a very long time to execute on large
repositories. The least we can do is to comfort users that some progress
is being made.

Signed-off-by: Ramkumar Ramachandra <artagnon@gmail.com>
---
 I was worried because of the long wait, so I wrote this to convince
 myself that git-svn wasn't stuck.

 git-svn.perl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/git-svn.perl b/git-svn.perl
index 60f8814..6aa156c 100755
--- a/git-svn.perl
+++ b/git-svn.perl
@@ -2022,6 +2022,9 @@ sub working_head_info {
 			next;
 		}
 		next unless s{^\s*(git-svn-id:)}{$1};
+		my $chomped = $_;
+		chomp $chomped;
+		print "[Importing] $chomped\n";
 		my ($url, $rev, $uuid) = extract_metadata($_);
 		if (defined $url && defined $rev) {
 			next if $max{$url} and $max{$url} < $rev;
-- 
2.2.1