From b7661719bc1f1ebd078c7e7adb2eb25c83526c27 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 13 Nov 2002 14:25:59 +0000
Subject: add/remove spaces to make perl_checker happy

---
 perl-install/harddrake/sound.pm | 2 +-
 perl-install/harddrake/v4l.pm   | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/harddrake')

diff --git a/perl-install/harddrake/sound.pm b/perl-install/harddrake/sound.pm
index 5b85116c8..267edd1de 100644
--- a/perl-install/harddrake/sound.pm
+++ b/perl-install/harddrake/sound.pm
@@ -175,7 +175,7 @@ sub switch {
                                [
                                 { label => N("Driver:"), val => \$new_driver, list => $alternative, default => $new_driver, sort =>1, format => sub {
                                     my %des = modules::category2modules_and_description('multimedia/sound');
-                                    "$_[0] (". $des{$_[0]} . ')'
+                                    "$_[0] (" . $des{$_[0]} . ')'
                                     }, allow_empty_list => 1 },
                                 {
                                     val => N("Help"), disabled => sub {},
diff --git a/perl-install/harddrake/v4l.pm b/perl-install/harddrake/v4l.pm
index ce944adcb..ee6b488ae 100644
--- a/perl-install/harddrake/v4l.pm
+++ b/perl-install/harddrake/v4l.pm
@@ -221,7 +221,7 @@ If your card is misdetected, you can force the right tuner and card types here.
         $conf{card} = $cards_lst->{$driver}{$conf{card}};
 
         my $options = 
-            'radio=' . ($conf{radio} ? 1 : 0) . ' '.
+            'radio=' . ($conf{radio} ? 1 : 0) . ' ' .
             join(' ', map { if_($conf{$_} ne -1, "$_=$conf{$_}") } qw(card pll tuner gbuffers));
         if ($options) {
             log::l("[harddrake::bttv] $options");
-- 
cgit v1.2.1