diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-03-26 18:21:10 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-03-26 18:21:10 +0000 |
commit | 11758856a710b653da90f798c22d7f5e98125fc0 (patch) | |
tree | b3ce67ad25e2fe52e3af03a59f1ab0ac4a388470 | |
parent | 47c045ac3aa9335ba2e2a409ccd3a0288c10683b (diff) | |
download | iurt-11758856a710b653da90f798c22d7f5e98125fc0.tar iurt-11758856a710b653da90f798c22d7f5e98125fc0.tar.gz iurt-11758856a710b653da90f798c22d7f5e98125fc0.tar.bz2 iurt-11758856a710b653da90f798c22d7f5e98125fc0.tar.xz iurt-11758856a710b653da90f798c22d7f5e98125fc0.zip |
(recreate_srpm) document it + perl_checker cleanup
-rw-r--r-- | lib/Iurt/Urpmi.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/Iurt/Urpmi.pm b/lib/Iurt/Urpmi.pm index f9ff838..7528623 100644 --- a/lib/Iurt/Urpmi.pm +++ b/lib/Iurt/Urpmi.pm @@ -591,6 +591,7 @@ sub fix_srpm_name { $srpm; } +# return ("exit_code", srpm, spec) sub recreate_srpm { my ($_self, $run, $config, $chroot_tmp, $dir, $srpm, $luser, $b_retry) = @_; # recreate a new srpm for buildarch condition in the spec file @@ -667,7 +668,7 @@ sub recreate_srpm { # Return if we can't regenerate srpm # - return (0, ,) unless $ret; + return 0 unless $ret; # CM: was: foreach my $file (readdir $dir) # The above line returned entries in a strange order in my test |