Changeset 27563 for main/trunk/greenstone2/perllib/buildcolutils.pm

Timestamp:

2013-06-06T11:29:54+12:00 (11 years ago)

Author:

kjdon

Message:

implementing the new build option sections_sort_on_document_metadata

File:

• main/trunk/greenstone2/perllib/buildcolutils.pm (modified) (3 diffs)

main/trunk/greenstone2/perllib/buildcolutils.pm

@@ -404 +404 @@
   if ($self->{'sections_index_document_metadata'} !~ /^(never|always|unless_section_metadata_exists)$/) {
     $self->{'sections_index_document_metadata'} = 'never';
+  }
+
+  if ($self->{'sections_sort_on_document_metadata'} !~ /\S/ && defined $collectcfg->{'sections_sort_on_document_metadata'})
+  {
+    $self->{'sections_sort_on_document_metadata'} = $collectcfg->{'sections_sort_on_document_metadata'};
+  }
+
+  if ($self->{'sections_sort_on_document_metadata'} !~ /^(never|always|unless_section_metadata_exists)$/) {
+    $self->{'sections_sort_on_document_metadata'} = 'never';
   }
 
@@ -463 +472 @@
   my $remove_empty_classifications = $self->{'remove_empty_classifications'};
   my $sections_index_document_metadata = $self->{'sections_index_document_metadata'};
+  my $sections_sort_on_document_metadata = $self->{'sections_sort_on_document_metadata'};
   my $site        = $self->{'site'};
   my $store_metadata_coverage = $self->{'store_metadata_coverage'};
@@ -602 +612 @@
     {
       $this_builder->set_sections_index_document_metadata($sections_index_document_metadata);
+    }
+    if ($this_buildertype eq "lucenebuilder" && $sections_sort_on_document_metadata ne "never")
+    {
+      $this_builder->set_sections_sort_on_document_metadata($sections_sort_on_document_metadata);
     }