diff options
| author | tv <tv@971eb68f-4bfb-0310-8326-d2484c010a4c> | 2012-06-15 16:38:30 +0000 |
|---|---|---|
| committer | tv <tv@971eb68f-4bfb-0310-8326-d2484c010a4c> | 2012-06-15 16:38:30 +0000 |
| commit | e7739438580e30fc9eb20ff446a7b9dc6c478015 (patch) | |
| tree | ba50b5be80939b5f0ea58f369523b2dee84dcb1a /RPM4/src | |
| parent | f83fba3cf29f5da35d8638f837fc49094bf9f160 (diff) | |
| download | perl-RPM4-e7739438580e30fc9eb20ff446a7b9dc6c478015.tar perl-RPM4-e7739438580e30fc9eb20ff446a7b9dc6c478015.tar.gz perl-RPM4-e7739438580e30fc9eb20ff446a7b9dc6c478015.tar.bz2 perl-RPM4-e7739438580e30fc9eb20ff446a7b9dc6c478015.tar.xz perl-RPM4-e7739438580e30fc9eb20ff446a7b9dc6c478015.zip | |
(Header_fullname) get_arch() already handle SRPMs
git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@208 971eb68f-4bfb-0310-8326-d2484c010a4c
Diffstat (limited to 'RPM4/src')
| -rw-r--r-- | RPM4/src/RPM4.xs | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/RPM4/src/RPM4.xs b/RPM4/src/RPM4.xs index 5e20da6..2a1f78b 100644 --- a/RPM4/src/RPM4.xs +++ b/RPM4/src/RPM4.xs @@ -1219,7 +1219,7 @@ Header_fullname(h) name, version, release, - headerIsEntry(h, RPMTAG_SOURCERPM) ? arch : "src" + arch )); } } else if (gimme == G_ARRAY) { @@ -1227,13 +1227,7 @@ Header_fullname(h) mPUSHs(newSVpv(name, 0)); mPUSHs(newSVpv(version, 0)); mPUSHs(newSVpv(release, 0)); - if (ix != 1) { - if (!headerIsEntry(h, RPMTAG_SOURCERPM)) { - mPUSHs(newSVpv("src", 0)); - } else { - mPUSHs(newSVpv(arch, 0)); - } - } + mPUSHs(newSVpv(arch, 0)); } } |