@@ -124,7 +124,8 @@ BEGIN
124124 " Set an SVN repository to a git tree-ish" ,
125125 { ' stdin|' => \$_stdin, %cmt_opts , %fc_opts , } ],
126126 ' show-ignore' => [ \&cmd_show_ignore, " Show svn:ignore listings" ,
127- { ' revision|r=i' => \$_revision } ],
127+ { ' revision|r=i' => \$_revision
128+ } ],
128129 ' multi-fetch' => [ \&cmd_multi_fetch,
129130 " Deprecated alias for $0 fetch --all" ,
130131 { ' revision|r=s' => \$_revision, %fc_opts } ],
@@ -144,10 +145,10 @@ BEGIN
144145 ' non-recursive' => \$Git::SVN::Log::non_recursive ,
145146 ' authors-file|A=s' => \$_authors,
146147 ' color' => \$Git::SVN::Log::color ,
147- ' pager=s' => \$Git::SVN::Log::pager ,
148+ ' pager=s' => \$Git::SVN::Log::pager
148149 } ],
149150 ' find-rev' => [ \&cmd_find_rev, " Translate between SVN revision numbers and tree-ish" ,
150- { } ],
151+ {} ],
151152 ' rebase' => [ \&cmd_rebase, " Fetch and rebase your working directory" ,
152153 { ' merge|m|M' => \$_merge,
153154 ' verbose|v' => \$_verbose,
@@ -811,7 +812,8 @@ sub cmt_metadata {
811812
812813sub working_head_info {
813814 my ($head , $refs ) = @_ ;
814- my ($fh , $ctx ) = command_output_pipe(' log' , ' --no-color' , $head );
815+ my @args = (' log' , ' --no-color' , ' --first-parent' );
816+ my ($fh , $ctx ) = command_output_pipe(@args , $head );
815817 my $hash ;
816818 my %max ;
817819 while (<$fh >) {
0 commit comments