Changeset 7362 for trunk/gsdl/perllib/plugins/RecPlug.pm

Timestamp:

2004-05-21T11:03:12+12:00 (20 years ago)

Author:

kjdon

Message:

plugin read functions now return 'undef' - didn't recognise, '-1' - recognised but had an error during processing, '0' - blocked or didn't process but don't pass it on to other plugins, or 'num_docs' processed. this emables a bit better error reporting about what has happened to each file

File:

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

trunk/gsdl/perllib/plugins/RecPlug.pm

@@ -228 +228 @@
     if (!opendir (DIR, $dirname)) {
     print $outhandle "RecPlug: WARNING - couldn't read directory $dirname\n";
-    return undef;
+    return -1; # error in processing
     }
     @dir = readdir (DIR);