diff --git a/src/perl/common/Server.xs b/src/perl/common/Server.xs
index ee26db3d..d1e7436c 100644
--- a/src/perl/common/Server.xs
+++ b/src/perl/common/Server.xs
@@ -21,10 +21,11 @@ PPCODE:
 	}
 
 Irssi::Connect
-server_create_conn(chat_type, dest, port=6667, password=NULL, nick=NULL)
+server_create_conn(chat_type, dest, port=6667, chatnet=NULL, password=NULL, nick=NULL)
 	int chat_type
 	char *dest
 	int port
+	chat *chatnet
 	char *password
 	char *nick