Issue with Resolve.pm file [SOLVED]

[gem-in-eyez]

was tinkering around with my urpmi and smart options for updating my packages and retrieving them.

 

I saw the option with smart and decided to give it a try. when it did not work I used the option on the urpmi.removemedia -a to clear the data and reinserted new sources when I tried to get pico to see what it was like I started getting errors.

 

When I solely typed the command urpmi I got this error:

 

Can't call method "arch" on an undefined value at /usr/lib/perl5/vendor_perl/5.8.0/i386-linux-thread-multi/URPM/Resolve.pm line 14.

 

this is the code and what line 14 contains:

 

exists $properties{$_} || $state->{installed}{$_} and next;

 

#- keep track if satisfied.

my $satisfied = 0;

#- check on selected package if a provide is satisfying the resolution (need to do the ops).

foreach my $sense (keys %{$state->{provided}{$n} || {}}) {

ranges_overlap($sense, $s) and ++$satisfied, last;

}

#- check on installed system a package which is not obsoleted is satisfying the require.

unless ($satisfied) {

if ($n =~ /^\//) {

$db->traverse_tag('path', [ $n ], sub {

my ($p) = @_;

exists $state->{obsoleted}{$p->fullname} and return;

$state->{ask_remove}{join '-', ($p->fullname)[0..2]} and return;

++$satisfied;

});

} else {

$db->traverse_tag('whatprovides', [ $n ], sub {

my ($p) = @_;

exists $state->{obsoleted}{$p->fullname} and return;

$state->{ask_remove}{join '-', ($p->fullname)[0..2]} and return;

foreach ($p->provides) {

$options{keep_state} or $state->{installed}{$_}{$p->fullname} = undef;

if (my ($pn, $ps) = /^([^\s\[]*)(?:\[\*\])?\[?([^\s\]]*\s*[^\s\]]*)/) {

$pn eq $n or next;

ranges_overlap($ps, $s) and ++$satisfied;

 

 

can someone tell me how I can repair this cause I cannot see or tell what the problems is.

 

thnx

 

[moved from Software by spinynorman]

 

 

solved the issue by simply install the distro in vmware and then copied the file over to my live box.

Edited May 15, 2006 by gem-in-eyez