summaryrefslogtreecommitdiffstats
path: root/perl-install/interactive_gtk.pm
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2000-09-27 18:16:17 +0000
committerdamien <damien@mandriva.com>2000-09-27 18:16:17 +0000
commit51c11136a227a70e4e4294233f6b4df20ac6fda2 (patch)
tree7e1d8891a89327728f853cfa4d47e4bb17d86ff9 /perl-install/interactive_gtk.pm
parenta3171da711cf44445c463fb12d969fd0f0fabdaf (diff)
downloaddrakx-backup-do-not-use-51c11136a227a70e4e4294233f6b4df20ac6fda2.tar
drakx-backup-do-not-use-51c11136a227a70e4e4294233f6b4df20ac6fda2.tar.gz
drakx-backup-do-not-use-51c11136a227a70e4e4294233f6b4df20ac6fda2.tar.bz2
drakx-backup-do-not-use-51c11136a227a70e4e4294233f6b4df20ac6fda2.tar.xz
drakx-backup-do-not-use-51c11136a227a70e4e4294233f6b4df20ac6fda2.zip
updated
Diffstat (limited to 'perl-install/interactive_gtk.pm')
-rw-r--r--perl-install/interactive_gtk.pm40
1 files changed, 20 insertions, 20 deletions
diff --git a/perl-install/interactive_gtk.pm b/perl-install/interactive_gtk.pm
index c4f83efa9..f8f994f2a 100644
--- a/perl-install/interactive_gtk.pm
+++ b/perl-install/interactive_gtk.pm
@@ -51,28 +51,28 @@ sub ask_from_list_with_helpW {
$::isWizard and my $pixmap = new Gtk::Pixmap( gtkcreate_xpm($w->{window}, $::wizard_xpm)) || die "pixmap $! not found.";
if ($::isWizard) {
gtkset_usize($w->{rwindow}, 500, 400);
- my $rc = "/etc/gtk/draknet.rc";
- -r $rc or $rc = common::dirname(__FILE__) . "/draknet.rc";
- Gtk::Rc->parse($rc) ;
- my $style = $w->{rwindow}->style->copy();
- $style->bg_pixmap(0);
- $style->bg_pixmap(1);
- $style->bg_pixmap(2);
- $style->bg_pixmap(3);
- $style->bg_pixmap(4);
- $style->bg(0, $style->white());
- $style->bg(1, $style->white());
- $style->bg(2, $style->white());
- $style->bg(3, $style->white());
- $style->bg(4, $style->white());
- $style->bg_gc(0, $style->white_gc);
- $style->bg_gc(1, $style->white_gc);
- $style->bg_gc(2, $style->white_gc);
- $style->bg_gc(3, $style->white_gc);
- $style->bg_gc(4, $style->white_gc);
+# my $rc = "/etc/gtk/draknet.rc";
+# -r $rc or $rc = common::dirname(__FILE__) . "/draknet.rc";
+# Gtk::Rc->parse($rc) ;
+# my $style = $w->{rwindow}->style->copy();
+# $style->bg_pixmap(0);
+# $style->bg_pixmap(1);
+# $style->bg_pixmap(2);
+# $style->bg_pixmap(3);
+# $style->bg_pixmap(4);
+# $style->bg(0, $style->white());
+# $style->bg(1, $style->white());
+# $style->bg(2, $style->white());
+# $style->bg(3, $style->white());
+# $style->bg(4, $style->white());
+# $style->bg_gc(0, $style->white_gc);
+# $style->bg_gc(1, $style->white_gc);
+# $style->bg_gc(2, $style->white_gc);
+# $style->bg_gc(3, $style->white_gc);
+# $style->bg_gc(4, $style->white_gc);
# $style->engine = undef;
# $style->rc_style = undef;
- $w->{rwindow}->set_style($style);
+# $w->{rwindow}->set_style($style);
}
gtkadd($w->{window},
gtkpack2_(create_box_with_title($w, @$messages),