--- trunk/run.pl 2007/04/01 21:47:48 814 +++ trunk/run.pl 2007/05/23 20:04:13 833 @@ -12,7 +12,7 @@ use WebPAC::Store 0.14; use WebPAC::Normalize 0.22; use WebPAC::Output::TT; -use WebPAC::Validate 0.06; +use WebPAC::Validate 0.11; use WebPAC::Output::MARC; use WebPAC::Config; use Getopt::Long; @@ -167,6 +167,7 @@ my $validate; $validate = new WebPAC::Validate( path => $validate_path, + delimiters => $config->webpac('delimiters'), ) if ($validate_path); @@ -560,6 +561,8 @@ $log->info("validation errors:\n$errors\n" ); print $report_fh "$errors\n" if ($report_fh); } + + print $report_fh "\nAll possible subfields/delimiter templates:\n", $validate->delimiters_templates, "\n\n"; } if ($stats) {