Changeset 27949 for main/trunk/greenstone2

Timestamp:

2013-08-01T14:43:08+12:00 (11 years ago)

Author:

ak19

Message:

Need to sort extra metadata (e.g. ex.PDF.* and ex.File.* meta extracted from the PDFBox tutorial collection) to have these meta appear in a consistent order in doc.xml for diffcol to work correctly.

File:

• main/trunk/greenstone2/perllib/plugins/BasePlugin.pm (modified) (1 diff)

main/trunk/greenstone2/perllib/plugins/BasePlugin.pm

@@ -1299 +1299 @@
     my $associate_tail_re = $self->{'associate_tail_re'};
 
-    foreach my $field (keys(%$metadata)) {
+# Sort the extra metadata for diffcol so these meta appear in a consistent order
+# in doc.xml. Necessary for the ex.PDF.* and ex.File.* meta that's extracted in
+# the PDFBox collection, as the order of these varies between CentOS and Ubuntu.
+    foreach my $field (sort keys(%$metadata)) {
     # $metadata->{$field} may be an array reference
     if ($field eq "gsdlassocfile_tobe") {