Changeset 26850


Ignore:
Timestamp:
2013-02-09T16:20:40+13:00 (8 years ago)
Author:
davidb
Message:

Additional tweak to handling Latitude and Longitude added, so versions that use metadata set prefixes also get fed in to the 'ex' version, so the runtime system can see these values

File:
1 edited

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/doc.pm

    r26540 r26850  
    10851085
    10861086    #If the metadata value is either a latitude or a longitude value then we want to save a shortened version for spacial searching purposes
    1087     if($field eq "Latitude" || $field eq "Longitude")
     1087    if ($field =~ m/^(.+\.)?Latitude$/ || $field =~ m/^(.+\.)?Longitude$/)
    10881088    {
     1089            my ($mdprefix,$metaname) = ($field =~ m/(.+)\.(.+)$/);
     1090        if (defined $mdprefix) {
     1091            # Add in a version of Latitude/Longitude without the metadata namespace prefix to keep Runtime happy
     1092            push (@{$section_ptr->{'metadata'}}, [$metaname, $value]);
     1093        }
     1094
    10891095        my $direction;
    10901096        if($value =~ m/^-/)
Note: See TracChangeset for help on using the changeset viewer.