summaryrefslogtreecommitdiffstats
path: root/perl-install/install/steps_interactive.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2007-08-30 13:02:55 +0000
committerThierry Vignaud <tv@mandriva.org>2007-08-30 13:02:55 +0000
commit1f57bfdd5569492fc1caf81cfa8a565b47f02fb9 (patch)
treecbb64e3682db4459351225745293796f20cbab78 /perl-install/install/steps_interactive.pm
parent6288c4410419d0877ba8f0425ca149f99ea33396 (diff)
downloaddrakx-1f57bfdd5569492fc1caf81cfa8a565b47f02fb9.tar
drakx-1f57bfdd5569492fc1caf81cfa8a565b47f02fb9.tar.gz
drakx-1f57bfdd5569492fc1caf81cfa8a565b47f02fb9.tar.bz2
drakx-1f57bfdd5569492fc1caf81cfa8a565b47f02fb9.tar.xz
drakx-1f57bfdd5569492fc1caf81cfa8a565b47f02fb9.zip
(summary) set specific icons for summary steps (#32923)
Diffstat (limited to 'perl-install/install/steps_interactive.pm')
-rw-r--r--perl-install/install/steps_interactive.pm5
1 files changed, 5 insertions, 0 deletions
diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm
index c7fcb8bf4..a8b9fd76d 100644
--- a/perl-install/install/steps_interactive.pm
+++ b/perl-install/install/steps_interactive.pm
@@ -748,6 +748,7 @@ sub summary {
push @l, {
group => N("System"),
label => N("Timezone"),
+ banner_icon => 'banner-languages',
val => sub { $o->{timezone}{timezone} },
clicked => sub { $timezone_manually_set = $o->configureTimezone(1) || $timezone_manually_set },
};
@@ -795,6 +796,7 @@ sub summary {
push @l, {
group => N("System"),
label => N("Services"),
+ banner_icon => 'banner-generic',
val => sub {
require services;
my ($l, $activated) = services::services();
@@ -816,6 +818,7 @@ sub summary {
push @l, {
group => N("Hardware"),
label => N("Mouse"),
+ banner_icon => 'banner-bootL',
val => sub { translate($o->{mouse}{type}) . ' ' . translate($o->{mouse}{name}) },
clicked => sub { selectMouse($o, 1); mouse::write($o->do_pkgs, $o->{mouse}) },
};
@@ -829,6 +832,7 @@ sub summary {
push @l, {
group => N("Hardware"),
label => N("Sound card"),
+ banner_icon => 'banner-generic',
val => sub {
$device->{driver} && modules::module2description($device->{driver}) || $device->{description};
},
@@ -873,6 +877,7 @@ sub summary {
push @l, {
group => N("Hardware"),
label => N("Graphical interface"),
+ banner_icon => 'banner-bootL',
val => sub { $o->{raw_X} ? Xconfig::various::to_string($o->{raw_X}) : '' },
clicked => sub { configureX($o, 'expert') },
};