Changeset 15962

Timestamp:

2008-06-12T12:15:17+12:00 (16 years ago)

Author:

kjdon

Message:

added a check for info_only before lookign at the arguments

File:

• gsdl/trunk/perllib/plugins/MARCPlugin.pm (modified) (2 diffs)

gsdl/trunk/perllib/plugins/MARCPlugin.pm

@@ -45 +45 @@
     'type' => "string",
     'deft' => "marctodc.txt",
-    'hiddengli' => "yes", # deprecated in favour or 'metadata_mapping_file'
+    'hiddengli' => "yes", # deprecated in favour of 'metadata_mapping_file'
     'reqd' => "no" },
       { 'name' => "metadata_mapping_file",
@@ -86 +86 @@
     my $self = new SplitTextFile($pluginlist, $inputargs, $hashArgOptLists);
 
+    if ($self->{'info_only'}) {
+    # don't worry about the options
+    return bless $self, $class;
+    }
     # 'metadata_mapping' was used in two ways in the plugin: as a plugin
     # option (filename) and as a datastructure to represent the mapping.