From d4b8b2f4e10450413ebafb175db6a5a17d2f0b9e Mon Sep 17 00:00:00 2001 From: tv Date: Mon, 2 Jan 2012 16:18:17 +0000 Subject: (Spec_sources, Spec_sources_url) fix unused parameter with rpm-4.9.x git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@171 971eb68f-4bfb-0310-8326-d2484c010a4c --- RPM4/src/RPM4.xs | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/RPM4/src/RPM4.xs b/RPM4/src/RPM4.xs index 2cf9e36..d72b60a 100644 --- a/RPM4/src/RPM4.xs +++ b/RPM4/src/RPM4.xs @@ -2912,6 +2912,8 @@ Spec_sources(spec, is = 0) #ifdef RPM4_9_0 rpmSpecSrcIter iter = rpmSpecSrcIterInit(spec); while ((srcPtr = rpmSpecSrcIterNext(iter)) != NULL) { + if (is && !(rpmSpecSrcFlags(srcPtr) & is)) + continue; XPUSHs(sv_2mortal(newSVpv(rpmSpecSrcFilename(srcPtr, 0), 0))); } #else @@ -2936,6 +2938,8 @@ Spec_sources_url(spec, is = 0) #ifdef RPM4_9_0 rpmSpecSrcIter iter = rpmSpecSrcIterInit(spec); while ((srcPtr = rpmSpecSrcIterNext(iter)) != NULL) { + if (is && !(rpmSpecSrcFlags(srcPtr) & is)) + continue; XPUSHs(sv_2mortal(newSVpv(rpmSpecSrcFilename(srcPtr, 1), 0))); } #else -- cgit v1.2.1