Changeset 3116

Timestamp:

2002-05-16T14:44:45+12:00 (22 years ago)

Author:

sjboddie

Message:

RecPlug will now die with an error if it finds a metadata.xml file that is
not well formed (it used to simply print a warning and continue). This
seems safer since the old behaviour could cause confusion. That is, it
tended to process part of a metadata.xml file then barf (e.g. if it found
a non-utf8 character), then continue on to produce unexpected results where
some documents contained the expected metadata and others didn't.

File:

• trunk/gsdl/perllib/plugins/RecPlug.pm (modified) (1 diff)

trunk/gsdl/perllib/plugins/RecPlug.pm

@@ -313 +313 @@
     };
     if ($@) {
-    my $outhandle = $self->{'outhandle'};
-    print $outhandle "RecPlug: Warning: Ignoring $filename because it is not a well formed metadata.xml file\n";
-    return;
+    die "RecPlug: ERROR $filename is not a well formed metadata.xml file ($@)\n";
     }
 }