Added SILC Thread Queue API

[crypto.git] / apps / irssi / src / perl / textui / TextUI.xs

diff --git a/apps/irssi/src/perl/textui/TextUI.xs b/apps/irssi/src/perl/textui/TextUI.xs
index 4e7db7b23ef9318092ee89b1ca7d67f1a391b6a8..a958e2020597e631b55cfc02d9524af6719f6fab 100644 (file)
--- a/apps/irssi/src/perl/textui/TextUI.xs
+++ b/apps/irssi/src/perl/textui/TextUI.xs
@@ -1,5 +1,8 @@
 #include "module.h"
 
+void perl_statusbar_init(void);
+void perl_statusbar_deinit(void);
+
 static int initialized = FALSE;
 
 static void perl_main_window_fill_hash(HV *hv, MAIN_WINDOW_REC *window)
@@ -104,6 +107,7 @@ deinit()
 CODE:
        if (!initialized) return;
         perl_statusbar_deinit();
+       initialized = FALSE;
 
 MODULE = Irssi::TextUI PACKAGE = Irssi