From 7ce6b8500c1e8dbf243c46324e549f278819455d Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Mon, 25 Jun 2001 16:41:39 +0000 Subject: new algorithm for searching packages. --- urpmq | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) (limited to 'urpmq') diff --git a/urpmq b/urpmq index 5bf65eb6..825071c3 100755 --- a/urpmq +++ b/urpmq @@ -46,6 +46,7 @@ usage: -M - extend query to package dependancies and remove already installed package only if they are newer or the same. -c - choose complete method for resolving requires closure. + -p - allow search in provides to find package. -g - print groups too with name. -r - print version and release too with name. @@ -76,6 +77,7 @@ for (@ARGV) { /M/ and do { $query->{minimal} = 0; next }; /c/ and do { $query->{complete} = 1; next }; /g/ and do { $query->{group} = 1; next }; + /p/ and do { $query->{use_provides} = 1; next }; /v/ and do { $query->{verbose} = 1; next }; /r/ and do { $query->{version} = $query->{release} = 1; next }; print STDERR _("urpmq: unknown option \"-%s\", check usage with --help\n", $1); exit(1) } next }; @@ -93,24 +95,25 @@ $query->{verbose} or $urpm->{log} = sub {}; $urpm->read_depslist; $query && $query->{group} and $urpm->read_compss; +$query && $query->{use_provides} and $urpm->read_provides; if (@files) { #- read provides file which is needed only to compute incremental #- dependancies, of files provided. - $urpm->read_provides; + $query && $query->{use_provides} or $urpm->read_provides; #- build closure with local package and return list of names. push @names, $urpm->register_local_packages(@files); } #- reparse whole internal depslist to match against newer packages only. -$urpm->{params}->relocate_depslist(); +$urpm->relocate_depslist(); #- search the packages according the selection given by the user, #- basesystem is added to the list so if it need to be upgraded, all its dependancy #- will be updated too. my %packages; -$urpm->search_packages(\%packages, [ @names ]) or $query->{force} or exit 1; +$urpm->search_packages(\%packages, [ @names ], use_provides => $query->{use_provides}) or $query->{force} or exit 1; #- auto select package for upgrading the distribution. if ($query->{auto_select}) { -- cgit v1.2.1