diff options
Diffstat (limited to 'RPM4')
-rw-r--r-- | RPM4/src/RPM4.xs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/RPM4/src/RPM4.xs b/RPM4/src/RPM4.xs index 3da7112..6fb1003 100644 --- a/RPM4/src/RPM4.xs +++ b/RPM4/src/RPM4.xs @@ -1294,9 +1294,10 @@ Header_files(header, scaremem = O_SCAREMEM) #ifdef HDLISTDEBUG PRINTF_CALL; #endif + SPAGAIN; Files = rpmfiNew(ts, header, RPMTAG_BASENAMES, scaremem); - if (Files != NULL && (Files = rpmfiInit(Files, 0)) != NULL && rpmfiNext(Files) >= 0) { - XPUSHs(sv2_mortal(sv_setref_pv(newSVpv("", 0), bless_rpmfi, Files))); + if (Files != NULL && (Files = rpmfiInit(Files, 0)) != NULL && rpmfiNext(Files) >= 0) { + XPUSHs(sv_setref_pv(sv_newmortal(), bless_rpmfi, (void *)Files)); #ifdef HDRPMMEM PRINTF_NEW(bless_rpmfi, Files, Files->nrefs); #endif |