summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/Xconfig/resolution_and_depth.pm6
1 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/Xconfig/resolution_and_depth.pm b/perl-install/Xconfig/resolution_and_depth.pm
index 295ea4a9a..6972e1518 100644
--- a/perl-install/Xconfig/resolution_and_depth.pm
+++ b/perl-install/Xconfig/resolution_and_depth.pm
@@ -169,11 +169,13 @@ sub choices {
}
sub configure {
- my ($in, $raw_X, $card, $monitor) = @_;
+ my ($in, $raw_X, $card, $monitor, $auto) = @_;
my ($default_resolution, @resolutions) = choices($raw_X, $raw_X->get_resolution, $card, $monitor);
- if ($in->isa('interactive::gtk')) {
+ if ($auto) {
+ #- use $default_resolution
+ } elsif ($in->isa('interactive::gtk')) {
$default_resolution = choose_gtk($card, $default_resolution, @resolutions) or return;
} else {
$default_resolution = choose($in, $default_resolution, @resolutions) or return;