--- a/libpurple/plugins/perl/common/Proxy.xs Tue May 01 02:34:22 2007 +0000 +++ b/libpurple/plugins/perl/common/Proxy.xs Tue May 01 03:21:27 2007 +0000 @@ -21,13 +21,16 @@ newCONSTSUB(stash, (char *)civ->name, newSViv(civ->iv)); } -Purple::ProxyInfo -purple_global_proxy_get_info() - Purple::Handle purple_proxy_get_handle() void +purple_proxy_init() + +MODULE = Purple::Proxy PACKAGE = Purple::ProxyInfo PREFIX = purple_proxy_info_ +PROTOTYPES: ENABLE + +void purple_proxy_info_destroy(info) Purple::ProxyInfo info @@ -79,5 +82,8 @@ Purple::ProxyInfo info const char *username -void -purple_proxy_init() +MODULE = Purple::Proxy PACKAGE = Purple::Proxy PREFIX = purple_ +PROTOTYPES: ENABLE + +Purple::ProxyInfo +purple_global_proxy_get_info()