summaryrefslogtreecommitdiffstats
path: root/urpm
diff options
context:
space:
mode:
Diffstat (limited to 'urpm')
-rw-r--r--urpm/args.pm1
-rw-r--r--urpm/select.pm11
2 files changed, 5 insertions, 7 deletions
diff --git a/urpm/args.pm b/urpm/args.pm
index b0d29aa1..cb4d0e9f 100644
--- a/urpm/args.pm
+++ b/urpm/args.pm
@@ -169,7 +169,6 @@ my %options_spec = (
noscripts => \$::noscripts,
repackage => \$::repackage,
restricted => \$::restricted,
- 'bundle!' => sub { $::bundle = $_[1] },
},
#- see also below, autogenerated callbacks
diff --git a/urpm/select.pm b/urpm/select.pm
index 7f234925..8f6c8f3f 100644
--- a/urpm/select.pm
+++ b/urpm/select.pm
@@ -323,7 +323,6 @@ sub get_preferred {
#- find packages to remove.
#- options:
-#- bundle
#- callback_base
#- callback_fuzzy
#- callback_notfound
@@ -349,7 +348,7 @@ sub find_packages_to_remove {
$db->traverse_tag('name', [ $n ], sub {
my ($p) = @_;
$p->fullname eq $_ or return;
- $urpm->resolve_rejected($db, $state, $p, removed => 1, bundle => $options{bundle});
+ $urpm->resolve_rejected($db, $state, $p, removed => 1);
push @m, scalar $p->fullname;
$found = 1;
});
@@ -362,7 +361,7 @@ sub find_packages_to_remove {
my ($p) = @_;
my ($name, $version, $release) = $p->fullname;
"$name-$version-$release" eq $_ or return;
- $urpm->resolve_rejected($db, $state, $p, removed => 1, bundle => $options{bundle});
+ $urpm->resolve_rejected($db, $state, $p, removed => 1);
push @m, scalar $p->fullname;
$found = 1;
});
@@ -375,7 +374,7 @@ sub find_packages_to_remove {
my ($p) = @_;
my ($name, $version) = $p->fullname;
"$name-$version" eq $_ or return;
- $urpm->resolve_rejected($db, $state, $p, removed => 1, bundle => $options{bundle});
+ $urpm->resolve_rejected($db, $state, $p, removed => 1);
push @m, scalar $p->fullname;
$found = 1;
});
@@ -386,7 +385,7 @@ sub find_packages_to_remove {
$db->traverse_tag('name', [ $_ ], sub {
my ($p) = @_;
$p->name eq $_ or return;
- $urpm->resolve_rejected($db, $state, $p, removed => 1, bundle => $options{bundle});
+ $urpm->resolve_rejected($db, $state, $p, removed => 1);
push @m, scalar $p->fullname;
$found = 1;
});
@@ -413,7 +412,7 @@ sub find_packages_to_remove {
my ($p) = @_;
my $f = scalar $p->fullname;
$f =~ $qmatch or return;
- $urpm->resolve_rejected($db, $state, $p, removed => 1, bundle => $options{bundle});
+ $urpm->resolve_rejected($db, $state, $p, removed => 1);
push @m, $f;
});
$urpm->{log}("...done, packages found [" . join(' ', @m) . "]");