From 5ddb29fb335c30b0a79ea6c9edb87615c97d10e7 Mon Sep 17 00:00:00 2001
From: Timo Sirainen <cras@irssi.org>
Date: Thu, 21 Jun 2001 07:10:25 +0000
Subject: if perl is compiled statically, initialize it after the "irssi init
 finished" signal so for example ~/.irssi/startup is run before the perl
 autorun scripts

git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1557 dbcabf3a-b0e7-0310-adc4-f8d773084564
---
 src/fe-text/irssi.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/fe-text/irssi.c b/src/fe-text/irssi.c
index bd1fcdc8..71039a79 100644
--- a/src/fe-text/irssi.c
+++ b/src/fe-text/irssi.c
@@ -142,11 +142,12 @@ static void textui_finish_init(void)
 
 	fe_common_core_finish_init();
 
+	signal_emit("irssi init finished", 0);
+
 #ifdef HAVE_STATIC_PERL
 	perl_core_init();
         fe_perl_init();
 #endif
-	signal_emit("irssi init finished", 0);
 
 	if (display_firsttimer) {
 		printtext_window(active_win, MSGLEVEL_CLIENTNOTICE,
-- 
cgit v1.2.3