From 3359d091b0d964c7ed52cdcb7085254433c33aa7 Mon Sep 17 00:00:00 2001
From: Timo Sirainen <cras@irssi.org>
Date: Sat, 8 Dec 2001 02:03:25 +0000
Subject: [PATCH] Fixed server_redirect_peek_signal() to compile again.

git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2222 dbcabf3a-b0e7-0310-adc4-f8d773084564
---
 src/perl/irc/Server.xs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/perl/irc/Server.xs b/src/perl/irc/Server.xs
index 48ef3ad6..3f1e5c23 100644
--- a/src/perl/irc/Server.xs
+++ b/src/perl/irc/Server.xs
@@ -118,8 +118,10 @@ server_redirect_peek_signal(server, event, args)
 	Irssi::Irc::Server server
 	char *event
 	char *args
+PREINIT:
+	int redirection;
 CODE:
-	RETVAL = (char *) server_redirect_peek_signal(server, event, args);
+	RETVAL = (char *) server_redirect_peek_signal(server, event, args, &redirection);
 OUTPUT:
 	RETVAL