Thu, 12 Feb 2009 06:00:15 +0000
Let XS do the argument checking/erroring for us for the components argument to
Purple::Serv::join_chat, we weren't doing any before.
Closes #8199.
#include "module.h" #include "../perl-handlers.h" MODULE = Purple::Signal PACKAGE = Purple::Signal PREFIX = purple_signal_ PROTOTYPES: ENABLE void purple_signal_connect_priority(instance, signal, plugin, callback, priority, data = 0) Purple::Handle instance const char *signal Purple::Plugin plugin SV *callback int priority SV *data CODE: purple_perl_signal_connect(plugin, instance, signal, callback, data, priority); void purple_signal_connect(instance, signal, plugin, callback, data = 0) Purple::Handle instance const char *signal Purple::Plugin plugin SV *callback SV *data CODE: purple_perl_signal_connect(plugin, instance, signal, callback, data, PURPLE_SIGNAL_PRIORITY_DEFAULT); void purple_signal_disconnect(instance, signal, plugin) Purple::Handle instance const char *signal Purple::Plugin plugin CODE: purple_perl_signal_disconnect(plugin, instance, signal);