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

(-)a/changelanguage.pl (-1 / +3 lines)
Lines 25-29 my $query = new CGI; Link Here
25
my $language = $query->param('language');
25
my $language = $query->param('language');
26
my $url      = $query->referer();
26
my $url      = $query->referer();
27
27
28
#warn "Language : $query // $language // $url";
28
$url =~ s|(.)language=[\w-]*&?|$1|;
29
$url =~ s|(&\|\?)$||; # Remove extraneous ? or &
30
29
C4::Templates::setlanguagecookie( $query, $language, $url );
31
C4::Templates::setlanguagecookie( $query, $language, $url );
(-)a/opac/opac-changelanguage.pl (-1 / +7 lines)
Lines 25-28 my $language = $query->param('language'); Link Here
25
my $url      = $query->referer() || '/';
25
my $url      = $query->referer() || '/';
26
26
27
# warn "Language : $query // $language // $url";
27
# warn "Language : $query // $language // $url";
28
29
# If language was set by an external URL the parameter
30
# 'language=' should be removed from url string, otherwise
31
# the language picker will not work
32
$url =~ s|(.)language=[\w-]*&?|$1|;
33
$url =~ s|(&\|\?)$||; # Remove extraneous ? or &
34
28
C4::Templates::setlanguagecookie( $query, $language, $url );
35
C4::Templates::setlanguagecookie( $query, $language, $url );
29
- 

Return to bug 16776