*** empty log message ***

This commit is contained in:
Antoine Drouin
2005-08-28 00:43:59 +00:00
parent 7a484e9a63
commit ecebfaabbe
5 changed files with 10 additions and 21 deletions
+5
View File
@@ -25,6 +25,11 @@
-->
<gui>
<section name="default">
<resource name="big_font" value="bleriot-radar-m18c"/>
<resource name="normal_font" value="bleriot-radar-m12c"/>
<resource name="small_font" value="bleriot-radar-m8c"/>
</section>
<section name="strip">
<resource name="background_color" value="=axial -90 |bisque|sandybrown;70"/>
<resource name="selected_background_color" value="=axial -90 |white|yellow;70"/>
@@ -24,9 +24,9 @@ sub populate {
sub completeinit {
my $self = shift;
$self->SUPER::completeinit;
$self->{big_font} = "bleriot-radar-m16c";
$self->{normal_font} = "bleriot-radar-m12c";
$self->{small_font} = "bleriot-radar-m8c";
$self->{big_font} = Paparazzi::GuiConfig::get_resource('default', 'big_font');
$self->{normal_font} = Paparazzi::GuiConfig::get_resource('default', 'normal_font');
$self->{small_font} = Paparazzi::GuiConfig::get_resource('default', 'small_font');
$self->build_gui();
}
@@ -93,7 +93,6 @@ sub completeinit {
value_color => Paparazzi::GuiConfig::get_resource('strip', 'value_color'),
};
# $self->parse_config();
$self->{prefix} = "STRIP_".$self->get(-aircraft)->get('-ac_id')."_";
$self->{zinc_bat} = undef;
$self->{zinc_bat_value} = undef;
@@ -101,21 +100,6 @@ sub completeinit {
$self->draw();
}
# sub parse_config {
# my ($self) = @_;
# my $parser = XML::DOM::Parser->new();
# print "Parsing gui.xml\n";
# return;
# my $doc = $parser->parsefile(Paparazzi::Environment::get_config("gui.xml"));
# my $strip = $doc->getElementsByTagName('strip')->[0];
# foreach my $attr ('selected_background_color', 'background_color', 'normal_font',
# 'small_font', 'border_color', 'label_color', 'value_color') {
# $self->{options}->{$attr} = $strip->getAttribute($attr);
# }
# }
# draw
# draw elements of the strip
##############################################################################
+1 -1
View File
@@ -39,7 +39,7 @@ my $options =
{
ivy_bus => "127.255.255.255:2005",
render => 1,
tracelevel => 1,
tracelevel => 3,
};
sub populate {
+1 -1
View File
@@ -8,7 +8,7 @@ use constant TRACE_ERROR => 1;
use constant TRACE_DEBUG => 2;
use constant TRACE_JUNK => 3;
my $tracelevel = 2;
my $tracelevel = 1;
sub init {
my ($level) = @_;