summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-08-16 05:35:18 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-08-16 05:35:18 +0000
commitd64eaf5086b9c7ae752071ebdd1325cf50823b87 (patch)
tree7dd409a4f81de1e4163b0fad36ae0984cf98b5ae /perl-install
parent7f9eea64cc14d0bf7f41da524972bccb59189f94 (diff)
downloaddrakx-d64eaf5086b9c7ae752071ebdd1325cf50823b87.tar
drakx-d64eaf5086b9c7ae752071ebdd1325cf50823b87.tar.gz
drakx-d64eaf5086b9c7ae752071ebdd1325cf50823b87.tar.bz2
drakx-d64eaf5086b9c7ae752071ebdd1325cf50823b87.tar.xz
drakx-d64eaf5086b9c7ae752071ebdd1325cf50823b87.zip
fix "Mouse" button in summary doing nothing
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps_gtk.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm
index 470f145b7..34787a591 100644
--- a/perl-install/install_steps_gtk.pm
+++ b/perl-install/install_steps_gtk.pm
@@ -186,9 +186,9 @@ press `F1' when booting on CDROM, then enter `text'."))) if availableRamMB() < 7
#------------------------------------------------------------------------------
sub selectMouse {
- my ($o) = @_;
+ my ($o, $force) = @_;
my %old = %{$o->{mouse}};
- $o->SUPER::selectMouse or return;
+ $o->SUPER::selectMouse($force) or return;
my $mouse = $o->{mouse};
$mouse->{type} eq 'none' ||
$old{type} eq $mouse->{type} &&
@@ -200,7 +200,7 @@ sub selectMouse {
mouse::test_mouse_install($mouse, $x_protocol_changed) and return;
%old = %$mouse;
- $o->SUPER::selectMouse(1);
+ $o->SUPER::selectMouse;
$mouse = $o->{mouse};
}
}