diff options
Diffstat (limited to 'lib/Iurt/Urpmi.pm')
| -rw-r--r-- | lib/Iurt/Urpmi.pm | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/lib/Iurt/Urpmi.pm b/lib/Iurt/Urpmi.pm index baa6b92..41186a8 100644 --- a/lib/Iurt/Urpmi.pm +++ b/lib/Iurt/Urpmi.pm @@ -524,28 +524,6 @@ sub clean_urpmi_process { } } -sub update_srpm { - my ($self, $dir, $rpm, $wrong_rpm) = @_; - my $run = $self->{run}; - my ($arch) = $rpm =~ /([^\.]+)\.rpm$/ or return 0; - if (!$srpm) { - my $hdr = RPM4::Header->new("$dir/$rpm"); - $hdr or return 0; - $srpm = $hdr->queryformat('%{SOURCERPM}'); - } - $srpm = fix_srpm_name($srpm, $rpm, $wrong_rpm); - $arch, $srpm; -} - -sub fix_srpm_name { - my ($srpm, $rpm, $wrong_rpm) = @_; - my $old_srpm = $srpm; - if ($srpm =~ s/^lib64/lib/) { - push @$wrong_rpm, [ $old_srpm, $rpm ] if ref $wrong_rpm; - } - $srpm; -} - # return ("exit_code", srpm, spec) sub recreate_srpm { my ($_self, $run, $config, $chroot_tmp, $dir, $srpm, $luser, $b_retry) = @_; |