diff options
| -rw-r--r-- | man/C/urpmf.8 | 2 | ||||
| -rw-r--r-- | urpm/args.pm | 17 | ||||
| -rwxr-xr-x | 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, @@ -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}>; |