Changeset 22294

Timestamp:

2010-06-23T14:48:46+12:00 (14 years ago)

Author:

kjdon

Message:

when asking for a piece of metadata, want to remove ex. from the ones we are searching through. Some metadata will be stored internally as ex., eg ex.File.MIMEType from EmbeddedMetadataPlugin. But this is equivalent to File.MIMEType

File:

• main/trunk/greenstone2/perllib/doc.pm (modified) (2 diffs)

main/trunk/greenstone2/perllib/doc.pm

@@ -729 +729 @@
         $data_name =~ s/^\w*\.//;
     }
-    
+    $data_name =~ s/^ex\.//; # we always remove ex. - it maybe there in doc_obj, but we will never ask for it.
     return $data->[1] if (scalar(@$data) >= 2 && $data_name eq $field);
     }
@@ -764 +764 @@
         $data_name =~ s/^\w*\.//;
     }
-
+    $data_name =~ s/^ex\.//; # we always remove ex. - it maybe there in doc_obj, but we will never ask for it.
         push (@metadata, $data->[1]) if ($data_name eq $field);
     }