Bug 7821 - fix C4::Templates::_current_language

Bareword "C4::Templates::_current_language" not allowed while "strict subs" in use at /home/oleonard/kohaclone/C4/XSLT.pm line 175.

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Fixes the problem.

Signed-off-by: Paul Poulain <paul.poulain@biblibre.com>

diff --git a/C4/XSLT.pm b/C4/XSLT.pm
index a22f2e5..56ba544 100644 (file)
--- a/C4/XSLT.pm
+++ b/C4/XSLT.pm
@@ -172,7 +172,7 @@ sub XSLTParse4Display {
     }
 
     if ( $xslfilename =~ m/\{langcode\}/ ) {
-        my $lang = C4::Templates::_current_language;
+        my $lang = C4::Templates::_current_language();
         $xslfilename =~ s/\{langcode\}/$lang/;
     }