Changeset 26850

Show
Ignore:
Timestamp:
09.02.2013 16:20:40 (7 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

Files:
1 modified

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/^-/)