From 8b9ea10d4fa56c53c50769852dade0ed771da53d Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Mon, 25 Apr 2005 15:48:07 +0000 Subject: Add support for a prohibit-remove option in urpmi.cfg (Michael Scherer) --- urpm.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'urpm.pm') diff --git a/urpm.pm b/urpm.pm index de0715e4..8c9c7a96 100644 --- a/urpm.pm +++ b/urpm.pm @@ -148,6 +148,7 @@ sub read_config { post-clean pre-clean priority-upgrade + prohibit-remove resume retry split-length @@ -3118,8 +3119,9 @@ sub find_removed_from_basesystem { my ($urpm, $db, $state, $callback_base) = @_; if ($callback_base && %{$state->{rejected} || {}}) { my %basepackages; + my @dont_remove = ('basesystem', split /,\s*/, $urpm->{global_config}{'prohibit-remove'}); #- check if a package to be removed is a part of basesystem requires. - $db->traverse_tag('whatprovides', [ 'basesystem' ], sub { + $db->traverse_tag('whatprovides', \@dont_remove, sub { my ($p) = @_; $basepackages{$p->fullname} = 0; }); -- cgit v1.2.1