diff --git a/conf/messages.xml b/conf/messages.xml
index 9365ce0bfc..ac6bd4a110 100644
--- a/conf/messages.xml
+++ b/conf/messages.xml
@@ -273,6 +273,15 @@
+
+
+
+
+
+
+
+
+
@@ -861,8 +870,8 @@
-
-
+
+
diff --git a/sw/ground_segment/tmtc/server.ml b/sw/ground_segment/tmtc/server.ml
index 5a437126ef..8b670b29af 100644
--- a/sw/ground_segment/tmtc/server.ml
+++ b/sw/ground_segment/tmtc/server.ml
@@ -841,11 +841,12 @@ let dl_id = "ground_dl" (* Hack, should be [my_id] *)
(** Got a ground.MOVE_WAYPOINT and send a datalink.MOVE_WP *)
let move_wp = fun logging _sender vs ->
let f = fun a -> List.assoc a vs
- and ac_id = Pprz.string_assoc "ac_id" vs in
+ and ac_id = Pprz.string_assoc "ac_id" vs
+ and deg7 = fun f -> Pprz.Int (truncate (Pprz.float_assoc f vs *. 1e7)) in
let vs = [ "ac_id", Pprz.String ac_id;
"wp_id", f "wp_id";
- "lat", f "lat";
- "lon", f "long";
+ "lat", deg7 "lat";
+ "lon", deg7 "long";
"alt", cm_of_m (Pprz.float_assoc "alt" vs) ] in
Dl_Pprz.message_send dl_id "MOVE_WP" vs;
log logging ac_id "MOVE_WP" vs