Mailinglist Archive: opensuse-buildservice (170 mails)

< Previous Next >
Re: [opensuse-buildservice] Re: imported package was not deleted when I deleted the built packages from original arch
On Tue, Jul 23, 2013 at 03:26:06PM +0900, UkJung Kim wrote:
Any idea regarding it?

I think the easiest fix is to simply prepend the 'id' to the file name
in oldrepo when the replaced.xml file is read in, i.e. change

my $replaced = (readxml("$jobdir/replaced.xml", $BSXML::dir, 1) ||
{})->{'entry'};
$oldrepo = {};
for (@{$replaced || []}) {
my $rp = $_->{'name'};
$_->{'name'} =~ s/\.[^\.]*$//;
$_->{'source'} = 1;
$oldrepo->{$rp} = $_;
}

to

my $replaced = (readxml("$jobdir/replaced.xml", $BSXML::dir, 1) ||
{})->{'entry'};
$oldrepo = {};
for (@{$replaced || []}) {
my $rp = "$_->{'id'}/$_->{'name'}";
$_->{'name'} =~ s/\.[^\.]*$//;
$_->{'source'} = 1;
$oldrepo->{$rp} = $_;
}

I.e. change
my $rp = $_->{'name'};
to
my $rp = "$_->{'id'}/$_->{'name'}";

Does that work for you?

Cheers,
Michael.

--
Michael Schroeder mls@xxxxxxx
SUSE LINUX Products GmbH, GF Jeff Hawn, HRB 16746 AG Nuernberg
main(_){while(_=~getchar())putchar(~_-1/(~(_|32)/13*2-11)*13);}
--
To unsubscribe, e-mail: opensuse-buildservice+unsubscribe@xxxxxxxxxxxx
To contact the owner, e-mail: opensuse-buildservice+owner@xxxxxxxxxxxx

< Previous Next >
References