Lines 100-106
sub plugin {
Link Here
|
100 |
$result = "$dateentered" . "t xxu||||| |||| 00| 0 eng d" unless $result; |
100 |
$result = "$dateentered" . "t xxu||||| |||| 00| 0 eng d" unless $result; |
101 |
my $errorXml = ''; |
101 |
my $errorXml = ''; |
102 |
# Check if the xml, xsd exists and is validated |
102 |
# Check if the xml, xsd exists and is validated |
103 |
my $dir = C4::Context->config('intrahtdocs') . '/prog/' . $template->param('lang') . '/modules/cataloguing/value_builder/'; |
103 |
my $dir = C4::Context->config('intrahtdocs') . '/prog/' . $template->{lang} . '/modules/cataloguing/value_builder/'; |
104 |
if (-r $dir . 'marc21_field_008.xml') { |
104 |
if (-r $dir . 'marc21_field_008.xml') { |
105 |
my $doc = XML::LibXML->new->parse_file($dir . 'marc21_field_008.xml'); |
105 |
my $doc = XML::LibXML->new->parse_file($dir . 'marc21_field_008.xml'); |
106 |
if (-r $dir . 'marc21_field_CF.xsd') { |
106 |
if (-r $dir . 'marc21_field_CF.xsd') { |
107 |
- |
|
|