summaryrefslogtreecommitdiffstats
path: root/perl-install/install_gtk.pm
diff options
context:
space:
mode:
authorGuillaume Cottenceau <gc@mandriva.com>2003-02-28 11:59:30 +0000
committerGuillaume Cottenceau <gc@mandriva.com>2003-02-28 11:59:30 +0000
commitfa496ea97563e3e85b156b25c43e74305151ebf4 (patch)
tree7091cbad474515add6dd5fef52acc13381de8dbb /perl-install/install_gtk.pm
parentfb34972ec8cd735591d1f10543fdd952104402cc (diff)
downloaddrakx-backup-do-not-use-fa496ea97563e3e85b156b25c43e74305151ebf4.tar
drakx-backup-do-not-use-fa496ea97563e3e85b156b25c43e74305151ebf4.tar.gz
drakx-backup-do-not-use-fa496ea97563e3e85b156b25c43e74305151ebf4.tar.bz2
drakx-backup-do-not-use-fa496ea97563e3e85b156b25c43e74305151ebf4.tar.xz
drakx-backup-do-not-use-fa496ea97563e3e85b156b25c43e74305151ebf4.zip
fix theming in --doc mode
Diffstat (limited to 'perl-install/install_gtk.pm')
-rw-r--r--perl-install/install_gtk.pm13
1 files changed, 11 insertions, 2 deletions
diff --git a/perl-install/install_gtk.pm b/perl-install/install_gtk.pm
index 54b051a35..54185be8f 100644
--- a/perl-install/install_gtk.pm
+++ b/perl-install/install_gtk.pm
@@ -42,7 +42,15 @@ style "white-on-blue"
style "background"
{
bg[NORMAL] = { 0.93, 0.93, 0.93 }
-});
+}
+
+style "background-logo"
+{
+ bg[NORMAL] = { 0.70, 0.70, 0.70 }
+}
+widget "*logo*" style "background-logo"
+
+);
#------------------------------------------------------------------------------
sub load_rc {
@@ -135,7 +143,8 @@ sub create_steps_window {
$w->{rwindow}->set_title('skip');
$steps{$_} ||= gtkcreate_pixbuf("steps_$_") foreach qw(on off);
- my $category = sub { gtkset_markup(Gtk2::Label->new, '<span foreground="gray81">' . $_[0] . '</span>') };
+ my $category = sub { gtkset_markup(Gtk2::Label->new,
+ $o->{doc} ? $_[0] : '<span foreground="gray81">' . $_[0] . '</span>') };
gtkpack__(my $vb = Gtk2::VBox->new(0, 3), $steps{inst} = $category->(N("System installation")), '');
foreach (grep { !eval $o->{steps}{$_}{hidden} } @{$o->{orderedSteps}}) {