Lines 33-38
use Koha::XSLT::Base;
Link Here
|
33 |
use Koha::Libraries; |
33 |
use Koha::Libraries; |
34 |
use Koha::Recalls; |
34 |
use Koha::Recalls; |
35 |
use Koha::TemplateUtils qw( process_tt ); |
35 |
use Koha::TemplateUtils qw( process_tt ); |
|
|
36 |
use C4::Scrubber; |
36 |
|
37 |
|
37 |
my $engine; #XSLT Handler object |
38 |
my $engine; #XSLT Handler object |
38 |
|
39 |
|
Lines 243-251
sub XSLTParse4Display {
Link Here
|
243 |
|
244 |
|
244 |
# Check if we should add extra content based on system preference |
245 |
# Check if we should add extra content based on system preference |
245 |
if ( C4::Context->preference('ExtraContentForXSLTDisplay') ) { |
246 |
if ( C4::Context->preference('ExtraContentForXSLTDisplay') ) { |
|
|
247 |
|
248 |
my $scrubber = C4::Scrubber->new(); |
246 |
my $extracontentvalue = C4::Context->preference('ExtraContentForXSLTDisplay'); |
249 |
my $extracontentvalue = C4::Context->preference('ExtraContentForXSLTDisplay'); |
247 |
my $extracontentproccessed = process_tt( $extracontentvalue, { record => $record } ); |
250 |
my $extracontentproccessed = process_tt( $extracontentvalue, { record => $record } ); |
248 |
$extracontentxml = "<extracontent><content>" . $extracontentproccessed . "</content></extracontent>"; |
251 |
my $cleanxml = $scrubber->scrub($extracontentproccessed); |
|
|
252 |
$extracontentxml = "<extracontent><content>" . $cleanxml . "</content></extracontent>"; |
249 |
} |
253 |
} |
250 |
|
254 |
|
251 |
# embed variables |
255 |
# embed variables |
252 |
- |
|
|