summaryrefslogtreecommitdiffstats
path: root/perl-install/Xconfig/resolution_and_depth.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-02-13 17:53:59 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-02-13 17:53:59 +0000
commit906d09feee7055c411790bb62ef839c43ba5fe0f (patch)
treebc03a9a3678c2e85edd9b71c04124470febe1351 /perl-install/Xconfig/resolution_and_depth.pm
parentaa5a8d932d27fb794b66ac81dc4b60487a2d928d (diff)
downloaddrakx-backup-do-not-use-906d09feee7055c411790bb62ef839c43ba5fe0f.tar
drakx-backup-do-not-use-906d09feee7055c411790bb62ef839c43ba5fe0f.tar.gz
drakx-backup-do-not-use-906d09feee7055c411790bb62ef839c43ba5fe0f.tar.bz2
drakx-backup-do-not-use-906d09feee7055c411790bb62ef839c43ba5fe0f.tar.xz
drakx-backup-do-not-use-906d09feee7055c411790bb62ef839c43ba5fe0f.zip
fix and some more Help
Diffstat (limited to 'perl-install/Xconfig/resolution_and_depth.pm')
-rw-r--r--perl-install/Xconfig/resolution_and_depth.pm10
1 files changed, 7 insertions, 3 deletions
diff --git a/perl-install/Xconfig/resolution_and_depth.pm b/perl-install/Xconfig/resolution_and_depth.pm
index 6972e1518..0efdc6671 100644
--- a/perl-install/Xconfig/resolution_and_depth.pm
+++ b/perl-install/Xconfig/resolution_and_depth.pm
@@ -176,7 +176,7 @@ sub configure {
if ($auto) {
#- use $default_resolution
} elsif ($in->isa('interactive::gtk')) {
- $default_resolution = choose_gtk($card, $default_resolution, @resolutions) or return;
+ $default_resolution = choose_gtk($in, $card, $default_resolution, @resolutions) or return;
} else {
$default_resolution = choose($in, $default_resolution, @resolutions) or return;
}
@@ -199,7 +199,7 @@ sub configure_auto_install {
}
sub choose_gtk {
- my ($card, $default_resolution, @resolutions) = @_;
+ my ($in, $card, $default_resolution, @resolutions) = @_;
my ($chosen_x_res, $chosen_y_res, $chosen_Depth) = @$default_resolution{'X', 'Y', 'Depth'};
$chosen_x_res ||= 640;
@@ -268,7 +268,11 @@ sub choose_gtk {
),
),
),
- 0, gtkadd($W->create_okcancel(N("Ok"), N("Cancel"))),
+ 0, gtkadd($W->create_okcancel(N("Ok"), N("Cancel"), '',
+ [ N("Help"), sub {
+ my $message = $in->interactive_help_get_id('configureX_resolution') or return;
+ $in->ask_warn(N("Help"), $message);
+ }, 1 ])),
));
$depth_combo->disable_activate;
$depth_combo->set_use_arrows_always(1);