Allow contrib new-workdir to link into bare repositories

diff --git a/git-svn.perl b/git-svn.perl
index eda9969f501fe1466610dedc0ea667714ba81653..fa46236ae854e4f1e2bebcf9cb3ec5ab57ec978c 100755 (executable)
--- a/git-svn.perl
+++ b/git-svn.perl
@@ -2477,7 +2477,7 @@ sub close_file {
                $md5->addfile($fh);
                my $got = $md5->hexdigest;
                die "Checksum mismatch: $path\n",
-                   "expected: $exp\n    got: $got\n" if ($got ne $exp);
+                   "expected: $exp\n    got: $got\n" if (defined $exp && $got ne $exp);
                sysseek($fh, 0, 0) or croak $!;
                if ($fb->{mode_b} == 120000) {
                        sysread($fh, my $buf, 5) == 5 or croak $!;