From 200e32436e1dab0e7341394520b88703678b4911 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 21 Mar 2005 18:02:34 +0000
Subject: add ->is_available

---
 perl-install/do_pkgs.pm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/perl-install/do_pkgs.pm b/perl-install/do_pkgs.pm
index 4bb6842a8..0bf8fedd8 100644
--- a/perl-install/do_pkgs.pm
+++ b/perl-install/do_pkgs.pm
@@ -45,7 +45,12 @@ sub ensure_is_installed_if_available {
         $do->what_provides($pkg) and $do->install($pkg);
     }
 }
-    
+
+sub is_available {
+    my ($do, $name) = @_;
+    $do->are_available($name);
+}
+
 sub is_installed {
     my ($do, $name) = @_;
     $do->are_installed($name);
-- 
cgit v1.2.1