From ea6ffda49af11182670a5ab620157c3ef212143b Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@mandriva.org>
Date: Wed, 19 Oct 2005 10:49:31 +0000
Subject: Remove urpmf --all option

---
 man/C/urpmf.8 |  2 --
 urpm/args.pm  | 17 -----------------
 urpmf         |  4 ++--
 3 files changed, 2 insertions(+), 21 deletions(-)

diff --git a/man/C/urpmf.8 b/man/C/urpmf.8
index cad43a46..7e704368 100644
--- a/man/C/urpmf.8
+++ b/man/C/urpmf.8
@@ -18,8 +18,6 @@ system's rpm database).
 .SH OPTIONS
 .IP "\fB\--help\fP"
 Prints a help message and exit.
-.IP "\fB\--all\fP"
-Prints and searches through all parameters listed below.
 .IP "\fB\--arch\fP"
 Prints and searches through the architecture tag.
 .IP "\fB\--buildhost\fP"
diff --git a/urpm/args.pm b/urpm/args.pm
index 8c7cd4ea..3d0292bb 100644
--- a/urpm/args.pm
+++ b/urpm/args.pm
@@ -146,23 +146,6 @@ my %options_spec = (
 
     #- see also below, autogenerated callbacks
     urpmf => {
-	all => add_param_closure(qw(
-	    buildhost
-	    conflicts
-	    description
-	    epoch
-	    filename
-	    files
-	    group
-	    obsoletes
-	    packager
-	    provides
-	    requires
-	    size
-	    sourcerpm
-	    summary
-	    url
-	)),
 	conffiles => add_param_closure('conf_files'),
 	debug => \$::debug,
 	literal => \$::literal,
diff --git a/urpmf b/urpmf
index 91a0f555..b1cc27ee 100755
--- a/urpmf
+++ b/urpmf
@@ -30,7 +30,6 @@ This is free software and may be redistributed under the terms of the GNU GPL.
 
 usage:
 ", $urpm::VERSION) . N("  --help         - print this help message
-") . N("  --all          - print all tags
 ") . N("  --arch         - print architecture
 ") . N("  --buildhost    - print build host
 ") . N("  --buildtime    - print build time
@@ -113,7 +112,8 @@ my $urpm = new urpm;
 $verbose or $urpm->{log} = sub {};
 
 #- build the callback matching the expression.
-#- XXX it would be nice to use "my $_" in this callback.
+#- it would be nice to use "my $_" in this callback.
+#- TODO handle multiple valued tags, requires, provides, files, etc
 my $callback = qq<sub {
     my (\$urpm, \$pkg) = \@_;
     local *_; \$_ = sprintf(qq{$qf\\n}>;
-- 
cgit v1.2.1