summaryrefslogtreecommitdiffstats
path: root/perl-install/c
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2000-03-10 19:56:05 +0000
committerFrancois Pons <fpons@mandriva.com>2000-03-10 19:56:05 +0000
commit39b16a6249eb865a2319a8e3cb1e4270e6fec539 (patch)
tree535f7e2d8a868cd7b55a9a420992935e8154285d /perl-install/c
parent975c4c27c0245389fedb1669bab816502f1c36f3 (diff)
downloaddrakx-backup-do-not-use-39b16a6249eb865a2319a8e3cb1e4270e6fec539.tar
drakx-backup-do-not-use-39b16a6249eb865a2319a8e3cb1e4270e6fec539.tar.gz
drakx-backup-do-not-use-39b16a6249eb865a2319a8e3cb1e4270e6fec539.tar.bz2
drakx-backup-do-not-use-39b16a6249eb865a2319a8e3cb1e4270e6fec539.tar.xz
drakx-backup-do-not-use-39b16a6249eb865a2319a8e3cb1e4270e6fec539.zip
*** empty log message ***
Diffstat (limited to 'perl-install/c')
-rw-r--r--perl-install/c/stuff.xs.pm11
1 files changed, 10 insertions, 1 deletions
diff --git a/perl-install/c/stuff.xs.pm b/perl-install/c/stuff.xs.pm
index bc405af1d..cdaa2d292 100644
--- a/perl-install/c/stuff.xs.pm
+++ b/perl-install/c/stuff.xs.pm
@@ -527,7 +527,16 @@ rpmtransSetScriptFd(trans, fd)
void *trans
int fd
CODE:
- rpmtransSetScriptFd(trans, fdDup(fd));
+ /* this code core dumps on install...
+ static FD_t scriptFd = NULL;
+ if (scriptFd == NULL) scriptFd = fdNew("");
+ fdSetFdno(scriptFd, fd);
+ rpmtransSetScriptFd(trans, scriptFd);
+ */
+ static FD_t scriptFd = NULL;
+ if (scriptFd != NULL) fdClose(scriptFd);
+ scriptFd = fdDup(fd);
+ rpmtransSetScriptFd(trans, scriptFd);
void
rpmRunTransactions(trans, callbackOpen, callbackClose, callbackMessage, force)