Mirrors_Framework/paparazzi
1
0
Fork 0
mirror of https://github.com/paparazzi/paparazzi.git synced 2026-05-31 12:23:23 +08:00
Code Issues Actions 26 Packages Projects Releases Wiki Activity

[gcs] adapt home icon to zoom level (#679)

Browse Source 
not tested yet, I don't have a gps to test with gpsd2ivy
This commit is contained in:
Gautier Hattenberger
2014-04-12 15:13:42 +02:00
parent f1ee63da39
commit d97ef3a89a
3 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
sw/lib/ocaml/mapCanvas.ml
+2 -2
View File
@@ -355,9 +355,9 @@ object (self)
end
| None -> failwith "#of_world : no georef"
method move_item = fun (item:GnomeCanvas.re_p GnoCanvas.item) wgs84 ->
method move_item = fun ?(z = 1.) (item:GnomeCanvas.re_p GnoCanvas.item) wgs84 ->
let (xw,yw) = self#world_of wgs84 in
item#affine_absolute (affine_pos_and_angle xw yw 0.);
item#affine_absolute (affine_pos_and_angle ~z xw yw 0.);
method moveto = fun wgs84 ->
let (xw, yw) = self#world_of wgs84 in
sw/lib/ocaml/mapCanvas.mli
+1
View File
@@ -76,6 +76,7 @@ class widget :
method menubar : GMenu.menu_shell
method mouse_motion : GdkEvent.Motion.t -> bool
method move_item :
?z:float ->
GnomeCanvas.re_p GnoCanvas.item -> Latlong.geographic -> unit
method moveto : Latlong.geographic -> unit
method of_world : Latlong.fmeter * Latlong.fmeter -> Latlong.geographic