Changeset 20451 for gsdl/trunk/perllib/plugins/OAIPlugin.pm

Timestamp:

2009-08-31T15:12:57+12:00 (15 years ago)

Author:

kjdon

Message:

metadata args may have ex. now. Trim ex. from values

File:

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

gsdl/trunk/perllib/plugins/OAIPlugin.pm

@@ -86 +86 @@
     my $self = new ReadXMLFile($pluginlist, $inputargs, $hashArgOptLists);
 
+    # trim ex. from document field (if there)
+    $self->{'document_field'} =~ s/^ex\.//;
     return bless $self, $class;
 }