diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2007-09-08 09:05:46 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2007-09-08 09:05:46 +0000 |
commit | 1644821da8787d86992609689afdebb63f0c0646 (patch) | |
tree | a8184c5f2cb50358197b37f600e7faffb33e3756 /URPM | |
parent | 2ea266a6eb9b6910e7227d0a571d9118f7f8a87b (diff) | |
download | perl-URPM-1644821da8787d86992609689afdebb63f0c0646.tar perl-URPM-1644821da8787d86992609689afdebb63f0c0646.tar.gz perl-URPM-1644821da8787d86992609689afdebb63f0c0646.tar.bz2 perl-URPM-1644821da8787d86992609689afdebb63f0c0646.tar.xz perl-URPM-1644821da8787d86992609689afdebb63f0c0646.zip |
document $state fields
Diffstat (limited to 'URPM')
-rw-r--r-- | URPM/Resolve.pm | 34 |
1 files changed, 24 insertions, 10 deletions
diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm index 577b383..e697a49 100644 --- a/URPM/Resolve.pm +++ b/URPM/Resolve.pm @@ -9,16 +9,30 @@ sub min { my $n = shift; $_ < $n and $n = $_ foreach @_; $n } sub uniq { my %l; $l{$_} = 1 foreach @_; grep { delete $l{$_} } @_ } #- $state fields : -#- * ask_remove: deprecated -#- * backtrack -#- * cached_installed -#- * oldpackage -#- * rejected -#- * selected -#- * transaction -#- * transaction_state -#- * unselected: deprecated -#- * whatrequires +#- +#- backtrack => { selected => { id => undef }, +#- deadlock => { id|property => undef } }, +#- +#- cached_installed => { property_name => { fullname => undef } }, +#- +#- oldpackage => int, +#- # will be passed to $trans->run to set RPMPROB_FILTER_OLDPACKAGE +#- +#- selected => { id => { requested => bool, install => bool, +#- from => pkg, psel => pkg, +#- promote => name, unsatisfied => [ id|property ] } }, +#- +#- rejected => { fullname => { size => int, removed => bool, obsoleted => bool, +#- backtrack => { promote => [ name ], keep => [ fullname ], +#- unsatisfied => [ id|property ], +#- closure => { fullname => { old_requested => bool, unsatisfied => [ id|property ] } } } } }, +#- +#- whatrequires => { name => { id => undef } }, +#- # reversed requires_nosense for selected packages +#- +#- # more fields only used in build_transaction_set and its callers) +#- transaction => [ { upgrade => [ id ], remove => [ fullname ] } ], +#- transaction_state => state_object, sub property2name { $_[0] =~ /^([^\s\[]*)/ && $1; |