From e47d0821bfd0def11d10bb68a46a3335934f283a Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 6 Jan 2004 17:24:08 +0000
Subject: perl_checker compliance

---
 perl-install/pkgs.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'perl-install/pkgs.pm')

diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index fb2960042..31646e367 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -155,7 +155,8 @@ sub packageByName {
 	    $best = $_;
 	}
     }
-    $best or log::l("unknown package `$name'") && undef;
+    $best or log::l("unknown package `$name'");
+    $best;
 }
 sub packageById {
     my ($packages, $id) = @_;
-- 
cgit v1.2.1