From ec81d7b6fe8630fefc840fdadb67e7acd114ab4f Mon Sep 17 00:00:00 2001 From: Timo Sirainen Date: Sun, 21 Oct 2001 10:31:03 +0000 Subject: [PATCH] Deinitialize perl before textui stuff. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1873 dbcabf3a-b0e7-0310-adc4-f8d773084564 --- src/fe-text/irssi.c | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/src/fe-text/irssi.c b/src/fe-text/irssi.c index 88c47c5d..543972fc 100644 --- a/src/fe-text/irssi.c +++ b/src/fe-text/irssi.c @@ -159,6 +159,11 @@ static void textui_deinit(void) while (modules != NULL) module_unload(modules->data); +#ifdef HAVE_STATIC_PERL + perl_core_deinit(); + fe_perl_deinit(); +#endif + signal_remove("gui exit", (SIGNAL_FUNC) sig_exit); lastlog_deinit(); @@ -178,11 +183,6 @@ static void textui_deinit(void) screen_refresh_thaw(); deinit_screen(); -#ifdef HAVE_STATIC_PERL - perl_core_deinit(); - fe_perl_deinit(); -#endif - theme_unregister(); fe_common_irc_deinit();