diff --git a/conf/control_panel.xml b/conf/control_panel.xml
index 285686a99e..d64e7ba95f 100644
--- a/conf/control_panel.xml
+++ b/conf/control_panel.xml
@@ -13,7 +13,7 @@
-
+
@@ -81,7 +81,7 @@
-
+
@@ -91,7 +91,7 @@
-
+
diff --git a/sw/lib/perl/Paparazzi/AircraftsManager.pm b/sw/lib/perl/Paparazzi/AircraftsManager.pm
index 1e95f8b299..fcb66f5b79 100644
--- a/sw/lib/perl/Paparazzi/AircraftsManager.pm
+++ b/sw/lib/perl/Paparazzi/AircraftsManager.pm
@@ -32,6 +32,9 @@ use Paparazzi::Aircraft;
use Paparazzi::Flightplan;
use Paparazzi::Airframe;
+use LWP::Simple;
+
+
sub populate {
my ($self, $args) = @_;
$self->SUPER::populate($args);
@@ -97,7 +100,10 @@ sub on_config {
my $fp_url = $fields->{flight_plan};
if (defined $fp_url) {
-# print "in AircraftsManager : on_config creating new flight plan\n";
+ # print "in AircraftsManager : on_config creating new flight plan\n";
+ my $doc = LWP::Simple::get $fp_url;
+ print "##### $doc\n";
+
my $fp = Paparazzi::Flightplan->new(-url => $fp_url);
# use Data::Dumper;
# print "##### waypoints\n".Dumper($fp->get('-waypoints'));