summaryrefslogtreecommitdiffstats
path: root/RPM4/src
diff options
context:
space:
mode:
authornanardon <nanardon@971eb68f-4bfb-0310-8326-d2484c010a4c>2007-07-21 16:49:08 +0000
committernanardon <nanardon@971eb68f-4bfb-0310-8326-d2484c010a4c>2007-07-21 16:49:08 +0000
commit4aa27656b701804d58d4b39245a6aa61e4fbd40d (patch)
tree97dfaf829ac97947250c947f66f1c9cd1d1279cf /RPM4/src
parente522e54059fa08222b5fa3eecf886955b71fb9bb (diff)
downloadperl-RPM4-4aa27656b701804d58d4b39245a6aa61e4fbd40d.tar
perl-RPM4-4aa27656b701804d58d4b39245a6aa61e4fbd40d.tar.gz
perl-RPM4-4aa27656b701804d58d4b39245a6aa61e4fbd40d.tar.bz2
perl-RPM4-4aa27656b701804d58d4b39245a6aa61e4fbd40d.tar.xz
perl-RPM4-4aa27656b701804d58d4b39245a6aa61e4fbd40d.zip
- fix another memleak
git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@139 971eb68f-4bfb-0310-8326-d2484c010a4c
Diffstat (limited to 'RPM4/src')
-rw-r--r--RPM4/src/RPM4.xs2
1 files changed, 2 insertions, 0 deletions
diff --git a/RPM4/src/RPM4.xs b/RPM4/src/RPM4.xs
index f03fdc0..bbbe741 100644
--- a/RPM4/src/RPM4.xs
+++ b/RPM4/src/RPM4.xs
@@ -715,6 +715,7 @@ expand(name)
PPCODE:
const char * value = rpmExpand(name, NULL);
XPUSHs(sv_2mortal(newSVpv(value, 0)));
+ free(value);
void
expandnumeric(name)
@@ -807,6 +808,7 @@ platformscore(platform)
void
buildhost()
+ PREINIT:
PPCODE:
XPUSHs(sv_2mortal(newSVpv(buildHost(),0)));