@@ -, +, @@ C4::Templates --- C4/Templates.pm | 15 --------------- C4/XSLT.pm | 4 ++-- catalogue/showmarc.pl | 2 +- opac/opac-showmarc.pl | 2 +- 4 files changed, 4 insertions(+), 19 deletions(-) --- a/C4/Templates.pm +++ a/C4/Templates.pm @@ -163,20 +163,6 @@ sub utf8_hashref { utf8::encode($hashref->{$key}) if utf8::is_utf8($hashref->{$key}); } } - - -# FIXME - this is a horrible hack to cache -# the current known-good language, temporarily -# put in place to resolve bug 4403. It is -# used only by C4::XSLT::XSLTParse4Display; -# the language is set via the usual call -# to themelanguage. -my $_current_language = 'en'; - -sub _current_language { - return $_current_language; -} - # wrapper method to allow easier transition from HTML template pro to Template Toolkit sub param { @@ -296,7 +282,6 @@ sub themelanguage { # Try to find first theme for the selected language for my $theme (@themes) { if ( -e "$htdocs/$theme/$lang/modules/$tmpl" ) { - $_current_language = $lang; return ($theme, $lang, \@themes) } } --- a/C4/XSLT.pm +++ a/C4/XSLT.pm @@ -162,7 +162,7 @@ sub XSLTParse4Display { if ( $xslfilename =~ /^\s*"?default"?\s*$/i ) { my $htdocs; my $theme; - my $lang = C4::Templates::_current_language(); + my $lang = C4::Languages::getlanguage(); my $xslfile; if ($xslsyspref eq "XSLTDetailsDisplay") { $htdocs = C4::Context->config('intrahtdocs'); @@ -189,7 +189,7 @@ sub XSLTParse4Display { } if ( $xslfilename =~ m/\{langcode\}/ ) { - my $lang = C4::Templates::_current_language(); + my $lang = C4::Languages::getlanguage(); $xslfilename =~ s/\{langcode\}/$lang/; } --- a/catalogue/showmarc.pl +++ a/catalogue/showmarc.pl @@ -55,7 +55,7 @@ if(!ref $record) { } if($view eq 'card') { - my $themelang = '/' . C4::Templates::_current_language(); + my $themelang = '/' . C4::Languages::getlanguage($input); my $xmlrecord= $importid? $record->as_xml(): GetXmlBiblio($biblionumber); my $xslfile = C4::Context->config('intrahtdocs') . '/prog' . $themelang . "/xslt/compact.xsl"; --- a/opac/opac-showmarc.pl +++ a/opac/opac-showmarc.pl @@ -57,7 +57,7 @@ if ($view eq 'card' || $view eq 'html') { my $xslfilename; my $htdocs = C4::Context->config('opachtdocs'); my $theme = C4::Context->preference("opacthemes"); - my $lang = C4::Templates::_current_language(); + my $lang = C4::Languages::getlanguage($input); if ($view eq 'card'){ $xslfile = "compact.xsl"; --