1
0
mirror of https://github.com/irssi/irssi.git synced 2024-12-04 14:46:39 -05:00

perl fixes

git-svn-id: http://svn.irssi.org/repos/irssi/trunk@754 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2000-10-14 15:19:56 +00:00 committed by cras
parent 5733a8c6e3
commit 76a6b9a931
2 changed files with 14 additions and 2 deletions

View File

@ -12,8 +12,7 @@ botti_DEPENDENCIES = @COMMON_NOUI_LIBS@
botti_LDADD = \ botti_LDADD = \
@COMMON_NOUI_LIBS@ \ @COMMON_NOUI_LIBS@ \
$(PROG_LIBS) \ $(PROG_LIBS)
$(PERL_LDFLAGS)
botti_SOURCES = \ botti_SOURCES = \
irssi.c irssi.c

View File

@ -23,6 +23,11 @@
#include "signals.h" #include "signals.h"
#include "core.h" #include "core.h"
#ifdef HAVE_STATIC_PERL
void perl_init(void);
void perl_deinit(void);
#endif
void irc_init(void); void irc_init(void);
void irc_deinit(void); void irc_deinit(void);
@ -57,11 +62,19 @@ void noui_init(void)
signal_add("reload", (SIGNAL_FUNC) sig_reload); signal_add("reload", (SIGNAL_FUNC) sig_reload);
signal_add("gui exit", (SIGNAL_FUNC) sig_exit); signal_add("gui exit", (SIGNAL_FUNC) sig_exit);
#ifdef HAVE_STATIC_PERL
perl_init();
#endif
signal_emit("irssi init finished", 0); signal_emit("irssi init finished", 0);
} }
void noui_deinit(void) void noui_deinit(void)
{ {
#ifdef HAVE_STATIC_PERL
perl_deinit();
#endif
signal_remove("reload", (SIGNAL_FUNC) sig_reload); signal_remove("reload", (SIGNAL_FUNC) sig_reload);
signal_remove("gui exit", (SIGNAL_FUNC) sig_exit); signal_remove("gui exit", (SIGNAL_FUNC) sig_exit);
irc_deinit(); irc_deinit();