From 54e573b27af58ec862bcafe12c5e63ff40a5abb3 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 8 Jul 2002 09:27:19 +0000
Subject: help perl_checker

---
 perl-install/install_steps_interactive.pm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 7fe82508d..a82697b80 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -1029,8 +1029,10 @@ sub summary {
      } @sound_cards),
     if_($isa_sound_card, { label => _("Sound card"), clicked => $isa_sound_card }), 
     (map {
-{ label => _("TV card"), val => $_->{description}, clicked => sub { require harddrake::bttv; harddrake::bttv::config($o) }} 
-     } grep { $_->{driver} eq 'bttv' } detect_devices::probeall()),
+{ label => _("TV card"), val => $_->{description}, clicked => sub { 
+      require harddrake::bttv; 
+      harddrake::bttv::config($o);
+} } } grep { $_->{driver} eq 'bttv' } detect_devices::probeall()),
 ]);
     install_steps::configureTimezone($o);  #- do not forget it.
 }
-- 
cgit v1.2.1