Changeset 22853

Timestamp:

2010-09-06T11:48:49+12:00 (14 years ago)

Author:

kjdon

Message:

print parse errors to failhandle and GLI xml as well as to outhandle

File:

• main/trunk/greenstone2/perllib/plugins/MetadataXMLPlugin.pm (modified) (1 diff)

main/trunk/greenstone2/perllib/plugins/MetadataXMLPlugin.pm

@@ -250 +250 @@
     if ($@) {
     my $plugin_name = ref ($self);
+    my $failhandle = $self->{'failhandle'};
     print $outhandle "$plugin_name failed to process $file ($@)\n";
-    
+    print $failhandle "$plugin_name failed to process $file ($@)\n";
+    print STDERR "<ProcessingError n='$file'>\n" if ($gli);
     return -1; #error
     }