summaryrefslogtreecommitdiffstats
path: root/RPM4/src
diff options
context:
space:
mode:
authortv <tv@971eb68f-4bfb-0310-8326-d2484c010a4c>2012-06-12 17:37:28 +0000
committertv <tv@971eb68f-4bfb-0310-8326-d2484c010a4c>2012-06-12 17:37:28 +0000
commitd8c3dce84743613a5c6634a1d8637984d5bb9f78 (patch)
treed139e5f006b3a7ba234227d071b4eb8c323edb30 /RPM4/src
parentef9ea1f996f15b1ded862eb2d7f149f8cc346c36 (diff)
downloadperl-RPM4-d8c3dce84743613a5c6634a1d8637984d5bb9f78.tar
perl-RPM4-d8c3dce84743613a5c6634a1d8637984d5bb9f78.tar.gz
perl-RPM4-d8c3dce84743613a5c6634a1d8637984d5bb9f78.tar.bz2
perl-RPM4-d8c3dce84743613a5c6634a1d8637984d5bb9f78.tar.xz
perl-RPM4-d8c3dce84743613a5c6634a1d8637984d5bb9f78.zip
(listtag) do not use deprecated pre-rpm-4.6.0 function: headerNextIterator -> headerNext
git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@191 971eb68f-4bfb-0310-8326-d2484c010a4c
Diffstat (limited to 'RPM4/src')
-rw-r--r--RPM4/src/RPM4.xs8
1 files changed, 5 insertions, 3 deletions
diff --git a/RPM4/src/RPM4.xs b/RPM4/src/RPM4.xs
index f5fa289..768468d 100644
--- a/RPM4/src/RPM4.xs
+++ b/RPM4/src/RPM4.xs
@@ -1080,12 +1080,14 @@ Header_listtag(h)
Header h
PREINIT:
HeaderIterator iterator;
- int tag;
+ struct rpmtd_s td;
PPCODE:
iterator = headerInitIterator(h);
- while (headerNextIterator(iterator, &tag, NULL, NULL, NULL)) {
- XPUSHs(sv_2mortal(newSViv(tag)));
+ while (headerNext(iterator, &td)) {
+ XPUSHs(sv_2mortal(newSViv(td.tag)));
+ rpmtdFreeData(&td);
}
+ rpmtdFreeData(&td);
headerFreeIterator(iterator);
int