diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2002-11-18 07:24:12 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2002-11-18 07:24:12 +0000 |
| commit | 71a636b1308fc06ce6b72f58c343b44a117060cf (patch) | |
| tree | 748504eff66897a65fe7cdb2d515e66dbdcf8dbb /perl-install/harddrake | |
| parent | 66c2af329c5fa7a8bdd58003b9ac0b87f96dfec1 (diff) | |
| download | drakx-backup-do-not-use-71a636b1308fc06ce6b72f58c343b44a117060cf.tar drakx-backup-do-not-use-71a636b1308fc06ce6b72f58c343b44a117060cf.tar.gz drakx-backup-do-not-use-71a636b1308fc06ce6b72f58c343b44a117060cf.tar.bz2 drakx-backup-do-not-use-71a636b1308fc06ce6b72f58c343b44a117060cf.tar.xz drakx-backup-do-not-use-71a636b1308fc06ce6b72f58c343b44a117060cf.zip | |
simplify code though my_gtk::gtkcolor
Diffstat (limited to 'perl-install/harddrake')
| -rw-r--r-- | perl-install/harddrake/ui.pm | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/perl-install/harddrake/ui.pm b/perl-install/harddrake/ui.pm index 34c9a670d..ea3cf7239 100644 --- a/perl-install/harddrake/ui.pm +++ b/perl-install/harddrake/ui.pm @@ -207,11 +207,8 @@ sub new { $vbox->set_child_packing($config_button, 0, 0, 0, 'start'); $vbox->set_child_packing($module_cfg_button, 0, 0, 0, 'start'); - my $cmap = Gtk::Gdk::Colormap->get_system; - my $color = { 'red' => 0x3100, 'green' => 0x6400, 'blue' => 0xbc00 }; - $cmap->color_alloc($color); - my $wcolor = { 'red' => 0xFFFF, 'green' => 0x6400, 'blue' => 0x6400 }; - $cmap->color_alloc($wcolor); + my $color = gtkcolor(0x3100, 0x6400, 0xbc00); + my $wcolor = gtkcolor(0xFFFF, 0x6400, 0x6400); $tree->set_column_auto_resize(0, 1); $tree->signal_connect('select_row', sub { |