From 6668bf06f8649a73e175003c2ec4320d5408bf73 Mon Sep 17 00:00:00 2001 From: Salvador Zaragoza Rubio Date: Mon, 11 Apr 2011 12:10:52 -0400 Subject: [PATCH] Bug 6167 - can't use 008 or 006 plugin in cataloging Due to changing to T-T $template->pama("lang") return undef, now is $template->{param} the right value. Signed-off-by: Nicole C. Engard Signed-off-by: Chris Cormack --- cataloguing/value_builder/marc21_field_006.pl | 2 +- cataloguing/value_builder/marc21_field_008.pl | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/cataloguing/value_builder/marc21_field_006.pl b/cataloguing/value_builder/marc21_field_006.pl index 6a4445af73..7b55a0a746 100755 --- a/cataloguing/value_builder/marc21_field_006.pl +++ b/cataloguing/value_builder/marc21_field_006.pl @@ -86,7 +86,7 @@ sub plugin { my $errorXml = ''; # Check if the xml, xsd exists and is validated - my $dir = C4::Context->config('intrahtdocs') . '/prog/' . $template->param('lang') . '/modules/cataloguing/value_builder/'; + my $dir = C4::Context->config('intrahtdocs') . '/prog/' . $template->{lang} . '/modules/cataloguing/value_builder/'; if (-r $dir . 'marc21_field_006.xml') { my $doc = XML::LibXML->new->parse_file($dir . 'marc21_field_006.xml'); if (-r $dir . 'marc21_field_CF.xsd') { diff --git a/cataloguing/value_builder/marc21_field_008.pl b/cataloguing/value_builder/marc21_field_008.pl index 8b5db263d3..5b8a7e5464 100755 --- a/cataloguing/value_builder/marc21_field_008.pl +++ b/cataloguing/value_builder/marc21_field_008.pl @@ -100,7 +100,7 @@ sub plugin { $result = "$dateentered" . "t xxu||||| |||| 00| 0 eng d" unless $result; my $errorXml = ''; # Check if the xml, xsd exists and is validated - my $dir = C4::Context->config('intrahtdocs') . '/prog/' . $template->param('lang') . '/modules/cataloguing/value_builder/'; + my $dir = C4::Context->config('intrahtdocs') . '/prog/' . $template->{lang} . '/modules/cataloguing/value_builder/'; if (-r $dir . 'marc21_field_008.xml') { my $doc = XML::LibXML->new->parse_file($dir . 'marc21_field_008.xml'); if (-r $dir . 'marc21_field_CF.xsd') { -- 2.39.5