--- a/libpurple/plugins/perl/common/Network.xs	Mon Apr 15 00:48:17 2013 +0200
+++ b/libpurple/plugins/perl/common/Network.xs	Wed Apr 17 18:56:03 2013 +0200
@@ -18,10 +18,6 @@
 const char *
 purple_network_get_public_ip()
 
-const unsigned char *
-purple_network_ip_atoi(ip)
-	const char *ip
-
 Purple::NetworkListenData
 purple_network_listen(port, socket_family, socket_type, map_external, cb, cb_data)
 	unsigned short port