@@ -2756,7 +2756,7 @@ sub git_print_page_nav {
27562756}
27572757
27582758sub format_paging_nav {
2759- my ($action , $hash , $head , $page , $nrevs ) = @_ ;
2759+ my ($action , $hash , $head , $page , $has_next_link ) = @_ ;
27602760 my $paging_nav ;
27612761
27622762
@@ -2774,7 +2774,7 @@ sub format_paging_nav {
27742774 $paging_nav .= " ⋅ prev" ;
27752775 }
27762776
2777- if ($nrevs >= (100 * ( $page +1)-1) ) {
2777+ if ($has_next_link ) {
27782778 $paging_nav .= " ⋅ " .
27792779 $cgi -> a({-href => href(-replay => 1, page => $page +1),
27802780 -accesskey => " n" , -title => " Alt-n" }, " next" );
@@ -4665,7 +4665,7 @@ sub git_log {
46654665
46664666 my @commitlist = parse_commits($hash , 101, (100 * $page ));
46674667
4668- my $paging_nav = format_paging_nav(' log' , $hash , $head , $page , (100 * ( $page +1)) );
4668+ my $paging_nav = format_paging_nav(' log' , $hash , $head , $page , $#commitlist >= 100 );
46694669
46704670 git_header_html();
46714671 git_print_page_nav(' log' ,' ' , $hash ,undef ,undef , $paging_nav );
@@ -5585,7 +5585,7 @@ sub git_shortlog {
55855585
55865586 my @commitlist = parse_commits($hash , 101, (100 * $page ));
55875587
5588- my $paging_nav = format_paging_nav(' shortlog' , $hash , $head , $page , (100 * ( $page +1)) );
5588+ my $paging_nav = format_paging_nav(' shortlog' , $hash , $head , $page , $#commitlist >= 100 );
55895589 my $next_link = ' ' ;
55905590 if ($#commitlist >= 100) {
55915591 $next_link =
0 commit comments