From c399875bd8b97f3492bb13ba693ff757b079e793 Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Mon, 11 Apr 2005 16:05:17 +0000 Subject: Don't remove basesystem packages when installing other ones --- urpmi | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/urpmi b/urpmi index 7254d94e..2606426c 100755 --- a/urpmi +++ b/urpmi @@ -406,6 +406,16 @@ if (@ask_unselect) { my @ask_remove = $urpm->{options}{'allow-force'} ? @{[]} : $urpm->removed_packages($state); if (@ask_remove) { + { + my $db = URPM::DB::open($root); + $urpm->find_removed_from_basesystem($db, $state, sub { + my $urpm = shift @_; + foreach (@_) { + $urpm->{error}(N("removing package %s will break your system", $_)); + } + @_ and $no_remove = 1; + }); + } my $list = join "\n", $urpm->translate_why_removed($state, sort @ask_remove); if ($no_remove && !$force) { -- cgit v1.2.1