[paparazzi-commits] [4512] remove zoom change in #move_item method

[Pascal Brisset]

Revision: 4512
          http://svn.sv.gnu.org/viewvc/?view=rev&root=paparazzi&revision=4512
Author:   hecto
Date:     2010-01-29 16:03:54 +0000 (Fri, 29 Jan 2010)
Log Message:
-----------
 remove zoom change in #move_item method

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

Modified: paparazzi3/trunk/sw/lib/ocaml/mapCanvas.ml
===================================================================
--- paparazzi3/trunk/sw/lib/ocaml/mapCanvas.ml  2010-01-28 17:17:56 UTC (rev 
4511)
+++ paparazzi3/trunk/sw/lib/ocaml/mapCanvas.ml  2010-01-29 16:03:54 UTC (rev 
4512)
@@ -356,7 +356,7 @@
 
     method move_item = fun (item:GnomeCanvas.re_p GnoCanvas.item) wgs84 ->
       let (xw,yw) = self#world_of wgs84 in
-      item#affine_absolute (affine_pos_and_angle ~z:self#zoom_adj#value xw yw 
0.);
+      item#affine_absolute (affine_pos_and_angle xw yw 0.);
            
     method moveto = fun wgs84 ->
       let (xw, yw) = self#world_of wgs84 in