From e9746d5b1868e7ecdbabce94c47325e05c2f666d Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 18 Nov 2002 16:44:52 +0000 Subject: make perl_checker happy --- perl-install/harddrake/sound.pm | 2 +- perl-install/harddrake/ui.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 1d7d4c2d8..8a20842dd 100644 --- a/perl-install/harddrake/sound.pm +++ b/perl-install/harddrake/sound.pm @@ -123,7 +123,7 @@ my %oss2alsa = "ymfpci" => [ "snd-ymfpci" ] ); -my @blacklist = (qw(cs46xx cs4281)); +my @blacklist = qw(cs46xx cs4281); my $blacklisted = 0; sub rooted { run_program::rooted($::prefix, @_) } diff --git a/perl-install/harddrake/ui.pm b/perl-install/harddrake/ui.pm index 741d9d19e..6957116ef 100644 --- a/perl-install/harddrake/ui.pm +++ b/perl-install/harddrake/ui.pm @@ -163,7 +163,7 @@ sub new { # Build the gui add_icon_path('/usr/share/pixmaps/harddrake2/'); - $w = my_gtk->new((N("Harddrake2 version ") . $harddrake::data::version)); + $w = my_gtk->new(N("Harddrake2 version ") . $harddrake::data::version); $w->{window}->set_usize(760, 550) unless $::isEmbedded; $options{MODEMS_DETECTION} = 1 unless defined $options{MODEMS_DETECTION}; $options{PRINTERS_DETECTION} = 1 unless defined $options{PRINTERS_DETECTION}; -- cgit v1.2.1