Merged with Irssi 0.8.6.

[silc.git] / apps / irssi / src / perl / common / Core.xs

diff --git a/apps/irssi/src/perl/common/Core.xs b/apps/irssi/src/perl/common/Core.xs
index c3fd41ba91bf45b44ddc9660e7ad9c943520aed8..d5b9d6e80789d6b7f198f6804a42554833b57959 100644 (file)
--- a/apps/irssi/src/perl/common/Core.xs
+++ b/apps/irssi/src/perl/common/Core.xs
@@ -2,6 +2,8 @@
 #include "irssi-version.h"
 #include "core.h"
 
+#include "pidwait.h"
+
 #define DEFAULT_COMMAND_CATEGORY "Perl scripts' commands"
 
 void perl_signal_add_hash(int priority, SV *sv)
@@ -242,7 +244,7 @@ input_add(source, condition, func, data)
        SV *func
        SV *data
 CODE:
-       RETVAL = perl_input_add(source, condition, func, data);
+       RETVAL = perl_input_add(source, condition, func, data, FALSE);
 OUTPUT:
        RETVAL