Changeset 20419 for gsdl/trunk/perllib/mgbuildproc.pm

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

File:

• gsdl/trunk/perllib/mgbuildproc.pm (modified) (1 diff)

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'})) {