From 9fa119e54bb2d23b4806d8aebf053d6ce3dfde42 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 10 Feb 2003 21:52:19 +0000
Subject: small cleanup

---
 perl-install/modules.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-install/modules.pm b/perl-install/modules.pm
index ad8519635..314b572ee 100644
--- a/perl-install/modules.pm
+++ b/perl-install/modules.pm
@@ -95,7 +95,7 @@ sub load_category {
 	eval { load([ $_->{driver}, $_->{options} ]) };
 	$_->{error} = $@;
 
-	!($@ && $_->{try});
+	!($_->{error} && $_->{try});
     } probe_category($category, $probe_type),
       map { { driver => $_, description => $_, try => 1 } } @try_modules;
 }
-- 
cgit v1.2.1