From cf9401e5dfcc7b668e9a2d40567b072e1923cc70 Mon Sep 17 00:00:00 2001
From: Gautier Hattenberger <gautier.hattenberger@enac.fr>
Date: Mon, 12 Mar 2018 11:08:07 +0100
Subject: [PATCH] [flightplan] no more warnings for the dummy wp distance to
 home

---
 sw/tools/generators/gen_flight_plan.ml | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/sw/tools/generators/gen_flight_plan.ml b/sw/tools/generators/gen_flight_plan.ml
index 7664314fac..36f9099658 100644
--- a/sw/tools/generators/gen_flight_plan.ml
+++ b/sw/tools/generators/gen_flight_plan.ml
@@ -1038,10 +1038,9 @@ let () =
 
       Xml2h.define "QFU" (sprintf "%.1f" qfu);
 
-      let waypoints = dummy_waypoint :: waypoints in
-
       let (hx, hy) = home waypoints in
       List.iter (check_distance (hx, hy) mdfh) waypoints;
+      let waypoints = dummy_waypoint :: waypoints in
       define_waypoints_indices waypoints;
 
       Xml2h.define "WAYPOINTS_UTM" "{ \\";