From 13da6ea62a67bd541bb4515af24bcc4ad692dcf7 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Tue, 11 Sep 2007 17:07:59 +0000
Subject: (get_update_medias) split it out of get_pkgs()

---
 Rpmdrake/pkg.pm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'Rpmdrake')

diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm
index 142ac4c3..a4e7b96a 100644
--- a/Rpmdrake/pkg.pm
+++ b/Rpmdrake/pkg.pm
@@ -153,6 +153,11 @@ sub formatlistpkg { join("\n", map { s/^(\s)/  \1/mg; "- $_" } sort { uc($a) cmp
 
 my (@update_medias, $is_update_media_already_asked);
 
+sub get_update_medias {
+    my ($urpm) = @_;
+    grep { !$_->{ignore} && $_->{update} } @{$urpm->{media}};
+}
+
 sub warn_about_media {
     my ($w, $opts) = @_;
 
@@ -225,7 +230,7 @@ sub get_pkgs {
 
     my $urpm = open_urpmi_db();
     my $_lock = urpm::lock::urpmi_db($urpm);
-    @update_medias = grep { !$_->{ignore} && $_->{update} } @{$urpm->{media}};
+    @update_medias = get_update_medias($urpm);
 
     warn_about_media($w, $opts);
 
-- 
cgit v1.2.1