"make" works without any variable setting

This commit is contained in:
Pascal Brisset
2005-02-23 18:53:15 +00:00
parent 532e76d492
commit 3ea8ce6b94
7 changed files with 35 additions and 16 deletions
+2
View File
@@ -38,11 +38,13 @@ let _ =
Hardware.create_sheet sheets;
Radio.create_sheet sheets;
Airframe.create_sheet sheets;
(***
Flightplan.create_sheet sheets;
Upload.create_sheet sheets;
Simulator.create_sheet sheets;
Monitor.create_sheet sheets;
Logalizer.create_sheet sheets;
***)
let quit_button = Button.create ~relief:`Sunken ~text:"Quit" ~command:exit sheets
and (n, _) = Grid.size sheets in
+1 -1
View File
@@ -53,7 +53,7 @@ let _ =
end;
true in
ignore (Glib.Io.add_watch `IN cb (Glib.Io.channel_of_descr fd)) in
ignore (Glib.Io.add_watch [`IN] cb (Glib.Io.channel_of_descr fd)) in
let handle_pprz_message = fun (msg_id, values) ->
let msg = Tele_Pprz.message_of_id msg_id in
+1 -1
View File
@@ -112,7 +112,7 @@ sub build_compile_page {
@pl = qw/-side top -expand yes -pady 2 -anchor w/;
my $mode_txt = 'Mode : '. (defined $paparazzi_src ? "Source tree" : "System install");
my $mode_label = $ground_frame->Label(-text => $mode_txt)->pack(@pl);
my $paparazzi_src_txt = 'location : '.$paparazzi_src;
my $paparazzi_src_txt = 'location : '. (defined $paparazzi_src ? $paparazzi_src : "/usr/share/paparazzi");
my $paparazzi_src_label = $ground_frame->Label(-text => $paparazzi_src_txt)->pack(@pl);
my $make_button = $ground_frame->Button(
-text => "Compile",
+1 -1
View File
@@ -7,7 +7,7 @@ BEGIN {
$ENV{PAPARAZZI_SRC}."/sw/lib/perl" : "/usr/lib/paparazzi/";
}
use lib ($paparazzi_lib);
use lib ($ENV{PAPARAZZI_SRC}."/sw/supervision");
# use lib ($ENV{PAPARAZZI_SRC}."/sw/supervision");
use Paparazzi::CpGui;
@ISA = qw(Paparazzi::CpGui);