From 932a3fcf735df7a05426c36825159b65e2ff8a62 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 3 Apr 2006 15:43:55 +0000 Subject: make legacy updates work (and inline auto_install_rpms() btw) --- mdkupdate | 15 ++++----------- 1 file changed, 4 insertions(+), 11 deletions(-) (limited to 'mdkupdate') diff --git a/mdkupdate b/mdkupdate index d981ebc0..3bf6eaae 100755 --- a/mdkupdate +++ b/mdkupdate @@ -129,10 +129,11 @@ if (!$bundle) { my $is_no_media_update = $release <= 10.1 ? '' : "--no-media-update"; system $rpm_exec_name, "--no-confirmation", $is_no_media_update, "--media=$mirror"; } elsif ($auto) { # FIXME - auto_install_rpms(); + my $ret = update_pkgs(@$pkgs); + $ret == 1 or output_p($logfile, "[mdkupdate] Error 100: Packages failed to upgrade"); } else { - my $pkgs = ask_pkgs($in); - install_pkgs($in, $pkgs, $mirror, { no_X => $noX }); + $pkgs = ask_pkgs($in) if !$auto; + install_pkgs($in, $pkgs, $mirror, { no_X => $noX || $auto }); $in->exit(0); } rpm_qa($afterrpm); @@ -293,14 +294,6 @@ sub my_fullname { "$name-$version-$release"; } -sub auto_install_rpms { - my ($pkgs) = shift; - my @pkg; - push(@pkg, $_ . '.rpm') foreach @$pkgs; - my $ret = update_pkgs(@pkg); - $ret == 1 or output_p($logfile, "[mdkupdate] Error 100: Packages failed to upgrade"); -} - sub add_media { my ($media_name, $mirror, $hdlist, $option) = @_; log::explanations("removing/adding the media $media_name"); -- cgit v1.2.1