Changeset 26850 for main/trunk/greenstone2

Timestamp:

2013-02-09T16:20:40+13:00 (11 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:

• main/trunk/greenstone2/perllib/doc.pm (modified) (1 diff)

main/trunk/greenstone2/perllib/doc.pm

@@ -1085 +1085 @@
 
     #If the metadata value is either a latitude or a longitude value then we want to save a shortened version for spacial searching purposes
-    if($field eq "Latitude" || $field eq "Longitude")
+    if ($field =~ m/^(.+\.)?Latitude$/ || $field =~ m/^(.+\.)?Longitude$/)
     {
+            my ($mdprefix,$metaname) = ($field =~ m/(.+)\.(.+)$/);
+        if (defined $mdprefix) {
+            # Add in a version of Latitude/Longitude without the metadata namespace prefix to keep Runtime happy
+            push (@{$section_ptr->{'metadata'}}, [$metaname, $value]);
+        }
+
         my $direction;
         if($value =~ m/^-/)