@@ -52,7 +52,7 @@ sub evaluate_uri {
5252 # as base URL.
5353 # Therefore, if we needed to strip PATH_INFO, then we know that we have
5454 # to build the base URL ourselves:
55- our $path_info = $ENV {" PATH_INFO" };
55+ our $path_info = decode_utf8( $ENV {" PATH_INFO" }) ;
5656 if ($path_info ) {
5757 if ($my_url =~ s ,\Q$path_info \E$, , &&
5858 $my_uri =~ s ,\Q$path_info \E$, , &&
@@ -817,9 +817,9 @@ sub evaluate_query_params {
817817
818818 while (my ($name , $symbol ) = each %cgi_param_mapping ) {
819819 if ($symbol eq ' opt' ) {
820- $input_params {$name } = [ $cgi -> param($symbol ) ];
820+ $input_params {$name } = [ map { decode_utf8( $_ ) } $cgi -> param($symbol ) ];
821821 } else {
822- $input_params {$name } = $cgi -> param($symbol );
822+ $input_params {$name } = decode_utf8( $cgi -> param($symbol ) );
823823 }
824824 }
825825}
@@ -2775,7 +2775,7 @@ sub git_populate_project_tagcloud {
27752775 }
27762776
27772777 my $cloud ;
2778- my $matched = $cgi -> param( ' by_tag ' ) ;
2778+ my $matched = $input_params { ' ctag ' } ;
27792779 if (eval { require HTML::TagCloud; 1; }) {
27802780 $cloud = HTML::TagCloud-> new;
27812781 foreach my $ctag (sort keys %ctags_lc ) {
@@ -3906,7 +3906,7 @@ sub print_search_form {
39063906 -values => [' commit' , ' grep' , ' author' , ' committer' , ' pickaxe' ]) .
39073907 $cgi -> sup($cgi -> a({-href => href(action => " search_help" )}, " ?" )) .
39083908 " search:\n " ,
3909- $cgi -> textfield(-name => " s" , -value => $searchtext ) . " \n " .
3909+ $cgi -> textfield(-name => " s" , -value => $searchtext , - override => 1 ) . " \n " .
39103910 " <span title=\" Extended regular expression\" >" .
39113911 $cgi -> checkbox(-name => ' sr' , -value => 1, -label => ' re' ,
39123912 -checked => $search_use_regexp ) .
@@ -5345,7 +5345,7 @@ sub git_project_list_body {
53455345
53465346 my $check_forks = gitweb_check_feature(' forks' );
53475347 my $show_ctags = gitweb_check_feature(' ctags' );
5348- my $tagfilter = $show_ctags ? $cgi -> param( ' by_tag ' ) : undef ;
5348+ my $tagfilter = $show_ctags ? $input_params { ' ctag ' } : undef ;
53495349 $check_forks = undef
53505350 if ($tagfilter || $searchtext );
53515351
@@ -6261,7 +6261,7 @@ sub git_tag {
62616261
62626262sub git_blame_common {
62636263 my $format = shift || ' porcelain' ;
6264- if ($format eq ' porcelain' && $cgi -> param( ' js ' ) ) {
6264+ if ($format eq ' porcelain' && $input_params { ' javascript ' } ) {
62656265 $format = ' incremental' ;
62666266 $action = ' blame_incremental' ; # for page title etc
62676267 }
0 commit comments