summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_interactive.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-04-01 13:16:25 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-04-01 13:16:25 +0000
commit33431ad9a921d8f2fd04d66a4a36175a1816ffb9 (patch)
tree14cec80341b9032326b3efa638b574ecaf83c0a4 /perl-install/install_steps_interactive.pm
parent54b42f3a18dc280468a846de79dc750887dc34eb (diff)
downloaddrakx-33431ad9a921d8f2fd04d66a4a36175a1816ffb9.tar
drakx-33431ad9a921d8f2fd04d66a4a36175a1816ffb9.tar.gz
drakx-33431ad9a921d8f2fd04d66a4a36175a1816ffb9.tar.bz2
drakx-33431ad9a921d8f2fd04d66a4a36175a1816ffb9.tar.xz
drakx-33431ad9a921d8f2fd04d66a4a36175a1816ffb9.zip
move harddrake::sound $index param in hash and pass only the hash ref around
functions
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r--perl-install/install_steps_interactive.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index aa2869585..e11105d25 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -946,7 +946,6 @@ sub summary {
my $sound_index = 0;
foreach my $device (@sound_cards) {
- my $own_sound_index = $sound_index;
push @l, {
group => N("Hardware"),
label => N("Sound card"),
@@ -955,7 +954,8 @@ sub summary {
},
clicked => sub {
require harddrake::sound;
- harddrake::sound::config($o, $device, $own_sound_index)
+ $device->{sound_slot_index} = $sound_index;
+ harddrake::sound::config($o, $device);
},
};
$sound_index++;