Merge branch 'gb/maint-gitweb-esc-param'
* gb/maint-gitweb-esc-param: gitweb: fix esc_param
This commit is contained in:
commit
8e850a4dbd
@ -1096,8 +1096,7 @@ sub to_utf8 {
|
||||
# correct, but quoted slashes look too horrible in bookmarks
|
||||
sub esc_param {
|
||||
my $str = shift;
|
||||
$str =~ s/([^A-Za-z0-9\-_.~()\/:@])/sprintf("%%%02X", ord($1))/eg;
|
||||
$str =~ s/\+/%2B/g;
|
||||
$str =~ s/([^A-Za-z0-9\-_.~()\/:@ ]+)/CGI::escape($1)/eg;
|
||||
$str =~ s/ /\+/g;
|
||||
return $str;
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user