From a976235791b70bfe49785571a0c59ca18a50a565 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 13 May 2003 14:48:59 +0000 Subject: (configure_everything_or_configure_chooser) keyboard and mouse paremeters really are optional, Xconfig::default::configure() handle the fact they're undefined for us --- perl-install/Xconfig/main.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/perl-install/Xconfig/main.pm b/perl-install/Xconfig/main.pm index 38b0c0e64..ee1065f49 100644 --- a/perl-install/Xconfig/main.pm +++ b/perl-install/Xconfig/main.pm @@ -141,9 +141,9 @@ sub configure_chooser { } sub configure_everything_or_configure_chooser { - my ($in, $options, $auto, $keyboard, $mouse) = @_; + my ($in, $options, $auto, $o_keyboard, $o_mouse) = @_; my $raw_X = Xconfig::xfree->read; - my $default = Xconfig::default::configure($keyboard, $mouse); + my $default = Xconfig::default::configure($o_keyboard, $o_mouse); my $has_conf = @{$raw_X->{xfree3}} || @{$raw_X->{xfree4}}; $raw_X->{xfree3} = $default->{xfree3} if !@{$raw_X->{xfree3}}; $raw_X->{xfree4} = $default->{xfree4} if !@{$raw_X->{xfree4}}; -- cgit v1.2.1