Changeset 886

Timestamp:

11/23/06 19:04:35 (2 years ago)

Author:

dom

Message:

Allow a Google Maps URL to be pasted to provide the centre long,lat coords (paulm)

Location:

trunk

Files:

• Build.PL (modified) (3 diffs)
• INSTALL (modified) (1 diff)
• lib/OpenGuides/Config.pm (modified) (1 diff)

trunk/Build.PL

@@ -73 +73 @@
 my $install_directory; # used to suggest template paths
 my $use_plucene = 1; # keep track of this so we know what to put in prereqs
+my $centre_lat = ''; # contains centre lat derived from Google Maps URL
 foreach my $var ( qw(
    dbname dbuser dbpass dbhost script_name
@@ -128 +129 @@
     }
 
+    # If a Google Maps URL was provided last time we know the centre_lat
+    if ( $var eq 'centre_lat' && $centre_lat ) {
+        $val = $centre_lat;
+        next;
+    }    
+
     # Here is where we actually ask the questions.
     unless ( $skip_config ) {
@@ -138 +145 @@
         } else {
             $val = Module::Build->prompt("\n$qu ", $def);
+        }
+    }
+
+    # Allow user to use a Google Maps URL rather than enter lat/long by hand.
+    # We assume centre_long is being asked for first; ensure so in big list above.
+    if ( $var eq 'centre_long' ) {
+        if ( $val =~ /ll=([-\d.]+),([-\d.]+)/ ) {
+            print "Got a Google Maps URL with centre long,lat: [$1, $2]\n";
+            $val = $1;
+            $centre_lat = $2;
         }
     }

trunk/INSTALL

@@ -205 +205 @@
   "What is the latitude of the centre point of a map to draw for your guide?"
 
-It's probably a good idea to pick some notionally central point for your 
-guide. For example, Carfax for Oxford, Charing Cross for London.
+It's probably a good idea to pick some notionally central point for your
+guide. For example, Carfax for Oxford, Charing Cross for London. As a
+convenience, you may paste in a Google Maps URL for the centre longitude
+question and the (long,lat) will be parsed out from the URL.
 
   "What default zoom level shall we use for Google Maps?"

trunk/lib/OpenGuides/Config.pm

@@ -160 +160 @@
         ellipsoid => "Which ellipsoid do you want to use? (eg 'Airy', 'WGS-84')",
         gmaps_api_key => "Do you have a Google Maps API key to use with this guide? If you enter it here the Google Maps functionality will be automatically enabled.",
-        centre_long => "What is the longitude of the centre point of a map to draw for your guide? (This question can be ignored if you aren't using Google Maps)",
+        centre_long => "What is the longitude of the centre point of a map to draw for your guide? (This question can be ignored if you aren't using Google Maps). You may paste in a Google Maps URL here (hint: copy URL from 'Link to this page')",
         centre_lat => "What is the latitude of the centre point of a map to draw for your guide? (This question can be ignored if you aren't using Google Maps)",
         default_gmaps_zoom => "What default zoom level shall we use for Google Maps? (This question can be ignored if you aren't using Google Maps)",