From bdfedfaa972c79ee622328bda609764715085835 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 20 Mar 2007 19:33:19 +0000 Subject: (update_pkgs) accept to not be given the list of package to update --- mdkupdate | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/mdkupdate b/mdkupdate index f423433f..712b1055 100755 --- a/mdkupdate +++ b/mdkupdate @@ -353,9 +353,9 @@ sub prepare_media { } sub update_pkgs { - @_ or return; + my (@pkgs) = @_; eval { - system "/usr/sbin/urpmi", "--auto", "--media", "update_source", map { if_(/(.*)-[^-]*-[^-]*\.[^-.]*?\.rpm$/, $1) } @_; + system "/usr/sbin/urpmi", "--auto", "--media", "update_source", map { if_(/(.*)-[^-]*-[^-]*\.[^-.]*?\.rpm$/, $1) } @pkgs; $? == 0 or die N("Unable to update packages from update_source medium.\n"); }; $@ and output_p($logfile, "[mdkupdate] Error 99: $@"), return 0; -- cgit v1.2.1