Mercurial > pidgin
view plugins/perl/common/ConvWindow.xs @ 9578:7cd7da72c872
[gaim-migrate @ 10421]
Fix a pretty good-sized problem that deryni pointed out in the Perl plugin.
Basically, if a script didn't have an unload function set, the data,
signals, timeouts, commands, etc. was remaining after the plugin was
unloaded. This should be fixed now, barring any bizarre bugs that result
from the simple change.
committer: Tailor Script <tailor@pidgin.im>
author | Christian Hammond <chipx86@chipx86.com> |
---|---|
date | Fri, 23 Jul 2004 00:12:55 +0000 |
parents | b14a7bc189b8 |
children | 6132e58aa618 |
line wrap: on
line source
#include "module.h" MODULE = Gaim::ConvWindow PACKAGE = Gaim::ConvWindow PREFIX = gaim_conv_window_ PROTOTYPES: ENABLE Gaim::ConvWindow gaim_conv_window_new() void DESTROY(win) Gaim::ConvWindow win CODE: gaim_conv_window_destroy(win); void gaim_conv_window_show(win) Gaim::ConvWindow win void gaim_conv_window_hide(win) Gaim::ConvWindow win void gaim_conv_window_raise(win) Gaim::ConvWindow win void gaim_conv_window_flash(win) Gaim::ConvWindow win int gaim_conv_window_add_conversation(win, conv) Gaim::ConvWindow win Gaim::Conversation conv Gaim::Conversation gaim_conv_window_remove_conversation(win, index) Gaim::ConvWindow win unsigned int index void gaim_conv_window_move_conversation(win, index, new_index) Gaim::ConvWindow win unsigned int index unsigned int new_index Gaim::Conversation gaim_conv_window_get_conversation_at(win, index) Gaim::ConvWindow win unsigned int index size_t gaim_conv_window_get_conversation_count(win) Gaim::ConvWindow win void gaim_conv_window_switch_conversation(win, index) Gaim::ConvWindow win unsigned int index Gaim::Conversation gaim_conv_window_get_active_conversation(win) Gaim::ConvWindow win void conversations(win) Gaim::ConvWindow win PREINIT: GList *l; CODE: for (l = gaim_conv_window_get_conversations(win); l != NULL; l = l->next) { XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Conversation"))); } MODULE = Gaim::ConvWindow PACKAGE = Gaim PREFIX = gaim_ PROTOTYPES: ENABLE void conv_windows() PREINIT: GList *l; CODE: for (l = gaim_get_windows(); l != NULL; l = l->next) XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ConvWindow")));