projects
/
koha.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 9684 : Correct path to compact.xsl
[koha.git]
/
catalogue
/
showmarc.pl
diff --git
a/catalogue/showmarc.pl
b/catalogue/showmarc.pl
index
1c453c4
..
0ee70c5
100755
(executable)
--- a/
catalogue/showmarc.pl
+++ b/
catalogue/showmarc.pl
@@
-52,10
+52,13
@@
else {
}
if($view eq 'card') {
}
if($view eq 'card') {
- my $themelang =
'/' . C4::Context->preference("opacthemes") .
'/' . C4::Templates::_current_language();
+ my $themelang = '/' . C4::Templates::_current_language();
my $xmlrecord= $importid? $record->as_xml(): GetXmlBiblio($biblionumber);
my $xslfile =
my $xmlrecord= $importid? $record->as_xml(): GetXmlBiblio($biblionumber);
my $xslfile =
- C4::Context->config('intrahtdocs') . $themelang . "/xslt/compact.xsl";
+ C4::Context->config('intrahtdocs') . '/prog' . $themelang . "/xslt/compact.xsl";
+ if ( ! -f $xslfile && $themelang ne '/en' ) {
+ $xslfile=~s#$themelang#/en#;
+ }
my $parser = XML::LibXML->new();
my $xslt = XML::LibXSLT->new();
my $source = $parser->parse_string($xmlrecord);
my $parser = XML::LibXML->new();
my $xslt = XML::LibXSLT->new();
my $source = $parser->parse_string($xmlrecord);