Changeset 20419

Timestamp:

2009-08-28T12:05:38+12:00 (15 years ago)

Author:

kjdon

Message:

strip off ex. before retrieving metadata for indexing. ex. now valid in collect.cfg

Location:

gsdl/trunk/perllib

Files:

• lucenebuildproc.pm (modified) (1 diff)
• mgbuildproc.pm (modified) (1 diff)
• mgppbuildproc.pm (modified) (1 diff)

gsdl/trunk/perllib/lucenebuildproc.pm

@@ -223 +223 @@
         }
         else {
+            $submeta =~ s/^ex\.//; #strip off ex.
+
             # its a metadata element
             my @section_metadata = @{$doc_obj->get_metadata ($section, $submeta)};

gsdl/trunk/perllib/mgbuildproc.pm

@@ -107 +107 @@
             } else {
             my $first = 1;
+            $real_field =~ s/^ex\.//; # remove ex namespace if there
             my @section_metadata = @{$doc_obj->get_metadata ($section, $real_field)};
             if ($level eq "section" && $section ne $doc_obj->get_top_section() && $self->{'indexing_text'} && defined ($self->{'sections_index_document_metadata'})) {

gsdl/trunk/perllib/mgppbuildproc.pm

@@ -326 +326 @@
             }
             else {
+            $submeta =~ s/^ex\.//; #strip off ex.
             # its a metadata element
             my @section_metadata = @{$doc_obj->get_metadata ($section, $submeta)};