aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPer Øyvind Karlsen <peroyvind@mandriva.org>2011-06-21 12:56:16 +0000
committerPer Øyvind Karlsen <peroyvind@mandriva.org>2011-06-21 12:56:16 +0000
commit36114e372da41922cf8b6b03a590c98633c6a8ec (patch)
tree011708d52078f2c2f0c2f576ec96af397d8f79d0
parent891573e7ea78211ba19cccf20f5787283427ea08 (diff)
downloadperl-URPM-36114e372da41922cf8b6b03a590c98633c6a8ec.tar
perl-URPM-36114e372da41922cf8b6b03a590c98633c6a8ec.tar.gz
perl-URPM-36114e372da41922cf8b6b03a590c98633c6a8ec.tar.bz2
perl-URPM-36114e372da41922cf8b6b03a590c98633c6a8ec.tar.xz
perl-URPM-36114e372da41922cf8b6b03a590c98633c6a8ec.zip
same fix as previous, but for Pkg_fullname...
-rw-r--r--URPM.xs2
1 files changed, 1 insertions, 1 deletions
diff --git a/URPM.xs b/URPM.xs
index f41b3ae..2d338e0 100644
--- a/URPM.xs
+++ b/URPM.xs
@@ -1956,7 +1956,7 @@ Pkg_fullname(pkg)
EXTEND(SP, 4);
PUSHs(sv_2mortal(newSVpv(name, version-name-1)));
PUSHs(sv_2mortal(newSVpv(version, release-version-1)));
- PUSHs(sv_2mortal(newSVpv(release, arch-release-1)));
+ PUSHs(sv_2mortal(newSVpv(release, arch[-2] ? arch-release-1 : 0)));
PUSHs(sv_2mortal(newSVpv(arch == eos ? "" : arch, eos-arch)));
restore_chars();
}