diff options
| author | tv <tv@971eb68f-4bfb-0310-8326-d2484c010a4c> | 2016-10-26 16:11:02 +0000 |
|---|---|---|
| committer | tv <tv@971eb68f-4bfb-0310-8326-d2484c010a4c> | 2016-10-26 16:11:02 +0000 |
| commit | fdb1f38aa050e42eac627bd8de8ff463c06485d8 (patch) | |
| tree | 41ad168fd66723f10d041d9f45208d6715dd836c /RPM4/src | |
| parent | eb75a3e21dd3c9f67468f75b1f43a33367ab32be (diff) | |
| download | perl-RPM4-fdb1f38aa050e42eac627bd8de8ff463c06485d8.tar perl-RPM4-fdb1f38aa050e42eac627bd8de8ff463c06485d8.tar.gz perl-RPM4-fdb1f38aa050e42eac627bd8de8ff463c06485d8.tar.bz2 perl-RPM4-fdb1f38aa050e42eac627bd8de8ff463c06485d8.tar.xz perl-RPM4-fdb1f38aa050e42eac627bd8de8ff463c06485d8.zip | |
fix segfault in testsuite
else we segfault in plugins/syslog.c's syslog_tsm_pre() because
rpmtsRootDir(ts) returns NULL
rpmlib expects rootdir to always have been set
testsuite was segfaulting since at least mga5/rpm-4.12
git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@261 971eb68f-4bfb-0310-8326-d2484c010a4c
Diffstat (limited to 'RPM4/src')
| -rw-r--r-- | RPM4/src/RPM4.xs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/RPM4/src/RPM4.xs b/RPM4/src/RPM4.xs index 86d1228..659f496 100644 --- a/RPM4/src/RPM4.xs +++ b/RPM4/src/RPM4.xs @@ -1405,8 +1405,7 @@ Ts_new(perlclass, rootdir = NULL) PREINIT: rpmts ts = rpmtsCreate(); PPCODE: - if (rootdir) - rpmtsSetRootDir(ts, rootdir); + rpmtsSetRootDir(ts, rootdir); mXPUSHs(sv_setref_pv(newSVpvs(""), perlclass, (void *)ts)); void |