diff --git a/webtools/bonsai/cvsblame.cgi b/webtools/bonsai/cvsblame.cgi index e1f58aaa5c6f..d9a441b4d465 100755 --- a/webtools/bonsai/cvsblame.cgi +++ b/webtools/bonsai/cvsblame.cgi @@ -105,6 +105,8 @@ my ($file_head, $file_tail) = $filename =~ m@(.*/)?(.+)@; # $::opt_rev = ''; $::opt_rev = $::FORM{rev} if defined $::FORM{rev} and $::FORM{rev} ne 'HEAD'; +my $revstr = ''; +$revstr = "&rev=$::opt_rev" unless $::opt_rev eq ''; my $browse_revtag = 'HEAD'; $browse_revtag = $::opt_rev if ($::opt_rev =~ /[A-Za-z]/); my $revision = ''; @@ -261,7 +263,7 @@ print qq( - Full Change Log + Full Change Log $graph_cell diff --git a/webtools/bonsai/cvslog.cgi b/webtools/bonsai/cvslog.cgi index 974278ec75bb..05e7b1167615 100755 --- a/webtools/bonsai/cvslog.cgi +++ b/webtools/bonsai/cvslog.cgi @@ -75,6 +75,8 @@ my ($file_head, $file_tail) = $filename =~ m@(.*/)?(.+)@; # $::opt_rev = ""; $::opt_rev = $::FORM{'rev'} if defined $::FORM{'rev'} && $::FORM{'rev'} !~ m/^(HEAD|MAIN)$/; +my $revstr = ''; +$revstr = "&rev=$::opt_rev" unless $::opt_rev eq ''; my $browse_revtag = 'HEAD'; $browse_revtag = $::opt_rev if ($::opt_rev =~ /[A-Za-z]/); my $revision = ''; @@ -219,7 +221,7 @@ print qq( - blame  + blame  Annotate the author of each line. diff --git a/webtools/bonsai/rview.cgi b/webtools/bonsai/rview.cgi index e9d2aee4af3c..d245198a8852 100755 --- a/webtools/bonsai/rview.cgi +++ b/webtools/bonsai/rview.cgi @@ -201,7 +201,7 @@ $split = int(@files/4)+1; for $_ (@files){ $_ =~ s/\,v//; - print qq{\n"; print "
$_\n"; if( $j % $split == 0 ){