Changeset 27697 for main/trunk/greenstone2/perllib/plugins/ArchivesInfPlugin.pm

Timestamp:

2013-06-24T17:23:04+12:00 (11 years ago)

Author:

ak19

Message:

Dr Bainbridge fixed it so that the gdb files generated on Windows for diffcol match those on Linux. This actually involved changing the order in which docids appear in archiveinf-doc. This last needed the newly invented flag -sort to the ArchivesInfPlugin in combination with -sortmeta OID to import.pl

File:

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

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

@@ -52 +52 @@
     'reqd' => "no",
     'modegli' => "2" },
+    { 'name' => "sort",
+    'desc' => "{ArchivesInfPlugin.sort}",
+    'type' => "flag",
+    'reqd' => "no",
+    'modegli' => "2" }
 
          ];
@@ -244 +249 @@
     if ($self->{'reversesort'}) {
         $archive_info->reverse_sort();
+    } elsif ($self->{'sort'}) { 
+        $archive_info->sort();
     }