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")));