git-log: allow --decorate[=short|full]

diff --git a/git-svn.perl b/git-svn.perl
index a2934e8651390e6b1c67369015b062d1f96ffbd9..1da9f0781c24b4f4f6f63c137a0caccec85024d6 100755 (executable)
--- a/git-svn.perl
+++ b/git-svn.perl
@@ -3277,7 +3277,7 @@ sub _rev_map_get {
                my $i = int(($l/24 + $u/24) / 2) * 24;
                sysseek($fh, $i, SEEK_SET) or croak "seek: $!";
                sysread($fh, my $buf, 24) == 24 or croak "read: $!";
-               my ($r, $c) = unpack('NH40', $buf);
+               my ($r, $c) = unpack(rev_map_fmt, $buf);
 
                if ($r < $rev) {
                        $l = $i + 24;