View | Details | Raw Unified | Return to bug 20422
Collapse All | Expand All

(-)a/C4/Output.pm (-2 / +2 lines)
Lines 351-360 sub parametrized_url { Link Here
351
    my $vars = shift || {}; # ie { LANG => en }
351
    my $vars = shift || {}; # ie { LANG => en }
352
    my $ret = $url;
352
    my $ret = $url;
353
    while ( my ($key,$val) = each %$vars) {
353
    while ( my ($key,$val) = each %$vars) {
354
        my $val_url = URI::Escape::uri_escape_utf8($val);
354
        my $val_url = URI::Escape::uri_escape_utf8( $val // q{} );
355
        $ret =~ s/\{$key\}/$val_url/g;
355
        $ret =~ s/\{$key\}/$val_url/g;
356
    }
356
    }
357
    $ret =~ s/\{[^\{]*\}//g; # remove not defined vars
357
    $ret =~ s/\{[^\{]*\}//g; # remove remaining vars
358
    return $ret;
358
    return $ret;
359
}
359
}
360
360
(-)a/opac/opac-detail.pl (-1 / +1 lines)
Lines 200-205 if ($session->param('busc')) { Link Here
200
                }
200
                }
201
            } else {
201
            } else {
202
                for my $value (@{$arrParamsBusc->{$_}}) {
202
                for my $value (@{$arrParamsBusc->{$_}}) {
203
                    next if !defined($value);
203
                    $pasarParams .= '&' if ($j);
204
                    $pasarParams .= '&' if ($j);
204
                    $pasarParams .= $_ . '=' . Encode::decode('UTF-8', uri_escape_utf8($value));
205
                    $pasarParams .= $_ . '=' . Encode::decode('UTF-8', uri_escape_utf8($value));
205
                    $j++;
206
                    $j++;
206
- 

Return to bug 20422