[paparazzi-commits] [4431] change version for Google tiles (should be a parameter somewhere ?)

[Pascal Brisset]

Revision: 4431
          http://svn.sv.gnu.org/viewvc/?view=rev&root=paparazzi&revision=4431
Author:   hecto
Date:     2010-01-15 17:41:40 +0000 (Fri, 15 Jan 2010)
Log Message:
-----------
 change version for Google tiles (should be a parameter somewhere ?)

Modified Paths:
--------------
    paparazzi3/trunk/sw/lib/ocaml/gm.ml

Modified: paparazzi3/trunk/sw/lib/ocaml/gm.ml
===================================================================
--- paparazzi3/trunk/sw/lib/ocaml/gm.ml 2010-01-15 08:09:34 UTC (rev 4430)
+++ paparazzi3/trunk/sw/lib/ocaml/gm.ml 2010-01-15 17:41:40 UTC (rev 4431)
@@ -199,11 +199,12 @@
   done;
   ms_key
     
+let google_version = 51
 
 let url_of_tile_key = fun maps_source s -> 
   let (x, y, z) = xyz_of_qsrt s in
   match maps_source with
-    Google -> sprintf "http://khm0.google.com/kh/v=45&x=%d&s=&y=%d&z=%d"; x y z
+    Google -> sprintf "http://khm0.google.com/kh/v=%d&x=%d&s=&y=%d&z=%d"; 
google_version x y z
   | OSM ->    sprintf "http://tile.openstreetmap.org/%d/%d/%d.png"; z x y
   | MS ->    sprintf 
"http://a0.ortho.tiles.virtualearth.net/tiles/a%s.jpeg?g=%d"; (ms_key s) (z+32)