aboutsummaryrefslogtreecommitdiffstats
path: root/URPM.xs
diff options
context:
space:
mode:
authorOlivier Thauvin <nanardon@mandriva.org>2004-08-02 08:42:52 +0000
committerOlivier Thauvin <nanardon@mandriva.org>2004-08-02 08:42:52 +0000
commit5ac4d0ce7033d7e72fe745a4cb37783605a2201e (patch)
tree6cea97a1ffe384a5c8754764151adec0de3d7a16 /URPM.xs
parent3ffb7467c8d5c2d56e663e315ca0193256288fd8 (diff)
downloadperl-URPM-5ac4d0ce7033d7e72fe745a4cb37783605a2201e.tar
perl-URPM-5ac4d0ce7033d7e72fe745a4cb37783605a2201e.tar.gz
perl-URPM-5ac4d0ce7033d7e72fe745a4cb37783605a2201e.tar.bz2
perl-URPM-5ac4d0ce7033d7e72fe745a4cb37783605a2201e.tar.xz
perl-URPM-5ac4d0ce7033d7e72fe745a4cb37783605a2201e.zip
- remove test that can't works
Diffstat (limited to 'URPM.xs')
-rw-r--r--URPM.xs8
1 files changed, 4 insertions, 4 deletions
diff --git a/URPM.xs b/URPM.xs
index df4bcda..a358e26 100644
--- a/URPM.xs
+++ b/URPM.xs
@@ -697,7 +697,7 @@ return_list_tag_modifier(Header header, int_32 tag_name) {
void
return_list_tag(URPM__Package pkg, int_32 tag_name) {
dSP;
- if (pkg->h) {
+ if (pkg->h != NULL) {
void *list = NULL;
int_32 count, type;
headerGetEntry(pkg->h, tag_name, &type, (void **) &list, &count);
@@ -757,19 +757,19 @@ return_list_tag(URPM__Package pkg, int_32 tag_name) {
case RPMTAG_NAME:
{
get_fullname_parts(pkg, &name, &version, &release, &arch, &eos);
- XPUSHs(sv_2mortal(newSVpv(name, version-name)));
+ XPUSHs(sv_2mortal(newSVpv(name, version-name - 1)));
}
break;
case RPMTAG_VERSION:
{
get_fullname_parts(pkg, &name, &version, &release, &arch, &eos);
- XPUSHs(sv_2mortal(newSVpv(version, release-version)));
+ XPUSHs(sv_2mortal(newSVpv(version, release-version - 1)));
}
break;
case RPMTAG_RELEASE:
{
get_fullname_parts(pkg, &name, &version, &release, &arch, &eos);
- XPUSHs(sv_2mortal(newSVpv(release, arch-release)));
+ XPUSHs(sv_2mortal(newSVpv(release, arch-release - 1)));
}
break;
case RPMTAG_ARCH: