summaryrefslogtreecommitdiffstats
path: root/RPM4
diff options
context:
space:
mode:
authornanardon <nanardon@971eb68f-4bfb-0310-8326-d2484c010a4c>2006-06-11 02:58:14 +0000
committernanardon <nanardon@971eb68f-4bfb-0310-8326-d2484c010a4c>2006-06-11 02:58:14 +0000
commit03c5aa4ebd6dd7b8bceb4a2a92e131d8960542b4 (patch)
tree4b4b37306a5a6841da8131078d163f7abc0d3333 /RPM4
parent88e3fad5e5e61f2faa6280136f2d4cacf3f68f93 (diff)
downloadperl-RPM4-03c5aa4ebd6dd7b8bceb4a2a92e131d8960542b4.tar
perl-RPM4-03c5aa4ebd6dd7b8bceb4a2a92e131d8960542b4.tar.gz
perl-RPM4-03c5aa4ebd6dd7b8bceb4a2a92e131d8960542b4.tar.bz2
perl-RPM4-03c5aa4ebd6dd7b8bceb4a2a92e131d8960542b4.tar.xz
perl-RPM4-03c5aa4ebd6dd7b8bceb4a2a92e131d8960542b4.zip
- really fix segfault
git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@105 971eb68f-4bfb-0310-8326-d2484c010a4c
Diffstat (limited to 'RPM4')
-rw-r--r--RPM4/src/RPM4.xs4
1 files changed, 2 insertions, 2 deletions
diff --git a/RPM4/src/RPM4.xs b/RPM4/src/RPM4.xs
index f0bb272..8e76c66 100644
--- a/RPM4/src/RPM4.xs
+++ b/RPM4/src/RPM4.xs
@@ -1293,10 +1293,10 @@ Header_files(header, scaremem = O_SCAREMEM)
PPCODE:
#ifdef HDLISTDEBUG
PRINTF_CALL;
-#endif
- SPAGAIN;
+#endif
Files = rpmfiNew(ts, header, RPMTAG_BASENAMES, scaremem);
if (Files != NULL && (Files = rpmfiInit(Files, 0)) != NULL && rpmfiNext(Files) >= 0) {
+ SPAGAIN;
XPUSHs(sv_setref_pv(sv_newmortal(), bless_rpmfi, (void *)Files));
#ifdef HDRPMMEM
PRINTF_NEW(bless_rpmfi, Files, Files->nrefs);