|
Lines 75-81
sub transformMARCXML4XSLT {
Link Here
|
| 75 |
my $marcflavour = C4::Context->preference('marcflavour'); |
75 |
my $marcflavour = C4::Context->preference('marcflavour'); |
| 76 |
|
76 |
|
| 77 |
# FIXME: This should properly use the cache in the future, but is here to save on performance where possible |
77 |
# FIXME: This should properly use the cache in the future, but is here to save on performance where possible |
| 78 |
$av = getAuthorisedValues4MARCSubfields("") unless $av; |
78 |
$av = getAuthorisedValues4MARCSubfields($frameworkcode) unless $av; |
| 79 |
$branches = { map { $_->branchcode => $_->branchname } Koha::Libraries->search({}, { order_by => 'branchname' })->as_list } unless $branches; |
79 |
$branches = { map { $_->branchcode => $_->branchname } Koha::Libraries->search({}, { order_by => 'branchname' })->as_list } unless $branches; |
| 80 |
$itemtypes = { map { $_->{itemtype} => $_ } @{ Koha::ItemTypes->search_with_localization->unblessed } } unless $itemtypes; |
80 |
$itemtypes = { map { $_->{itemtype} => $_ } @{ Koha::ItemTypes->search_with_localization->unblessed } } unless $itemtypes; |
| 81 |
|
81 |
|
|
Lines 289-296
sub XSLTParse4Display {
Link Here
|
| 289 |
my $xslfilename = get_xsl_filename( $xslsyspref); |
289 |
my $xslfilename = get_xsl_filename( $xslsyspref); |
| 290 |
|
290 |
|
| 291 |
# grab the XML, run it through our stylesheet, push it out to the browser |
291 |
# grab the XML, run it through our stylesheet, push it out to the browser |
| 292 |
my $authorised_values = getAuthorisedValues4MARCSubfields(""); |
292 |
my $record = transformMARCXML4XSLT($biblionumber, $orig_record, undef, $branches, $itemtypes); |
| 293 |
my $record = transformMARCXML4XSLT($biblionumber, $orig_record, undef, $branches, $itemtypes, $authorised_values ); |
|
|
| 294 |
my $itemsxml; |
293 |
my $itemsxml; |
| 295 |
if ( $xslsyspref eq "OPACXSLTDetailsDisplay" || $xslsyspref eq "XSLTDetailsDisplay" || $xslsyspref eq "XSLTResultsDisplay" ) { |
294 |
if ( $xslsyspref eq "OPACXSLTDetailsDisplay" || $xslsyspref eq "XSLTDetailsDisplay" || $xslsyspref eq "XSLTResultsDisplay" ) { |
| 296 |
$itemsxml = ""; #We don't use XSLT for items display on these pages |
295 |
$itemsxml = ""; #We don't use XSLT for items display on these pages |
| 297 |
- |
|
|