view plugins/perl/common/Conversation_Chat.xs @ 11016:6417b2f5de4e

[gaim-migrate @ 12885] Wherever possible, allow users to act on objects and data directly, rather than through dialogs or explicit commands. For example, it is more intuitive to drag a circle object around in a diagram rather than selecting a "Move" command from a menu while the circle is selected. Simlarly, in an email application, allow the user to attach files by dragging them from the file manager and dropping them onto the message composition window if they wish. -- GNOME HIG This allows direct manipulation of buddy aliases and group names, by moving the features from dialogs to GtkTreeView's inline editing. I think this is a great change, but it seems like the type of thing that might stir up controversy. If so, take it to the mailing list for discussion. If not, I'll go ahead and perfect this sometime later. -s. committer: Tailor Script <[e-mail]>

#include "module.h"

MODULE = Gaim::Conversation::Chat  PACKAGE = Gaim::Conversation::Chat  PREFIX = gaim_conv_chat_
PROTOTYPES: ENABLE

Gaim::Conversation::Chat
new(account, name)
	Gaim::Account account
	const char *name
CODE:
	RETVAL = GAIM_CONV_CHAT(gaim_conversation_new(GAIM_CONV_CHAT, account, name));
OUTPUT:
	RETVAL

void
DESTROY(chat)
	Gaim::Conversation::Chat chat
CODE:
	gaim_conversation_destroy(gaim_conv_chat_get_conversation(chat));


Gaim::Conversation
gaim_conv_chat_get_conversation(chat)
	Gaim::Conversation::Chat chat

void
users(chat)
	Gaim::Conversation::Chat chat
PREINIT:
	GList *l;
PPCODE:
	for (l = gaim_conv_chat_get_users(chat); l != NULL; l = l->next)
	{
		XPUSHs(sv_2mortal(newSVpv(l->data, 0)));
	}

void
gaim_conv_chat_ignore(chat, name)
	Gaim::Conversation::Chat chat
	const char *name

void
gaim_conv_chat_unignore(chat, name)
	Gaim::Conversation::Chat chat
	const char *name

void
ignored_users(chat)
	Gaim::Conversation::Chat chat
PREINIT:
	GList *l;
PPCODE:
	for (l = gaim_conv_chat_get_ignored(chat); l != NULL; l = l->next)
	{
		XPUSHs(sv_2mortal(newSVpv(l->data, 0)));
	}

gboolean
gaim_conv_chat_is_user_ignored(chat, user)
	Gaim::Conversation::Chat chat
	const char *user

void
gaim_conv_chat_set_topic(chat, who, topic)
	Gaim::Conversation::Chat chat
	const char *who
	const char *topic

const char *
gaim_conv_chat_get_topic(chat)
	Gaim::Conversation::Chat chat

int
gaim_conv_chat_get_id(chat)
	Gaim::Conversation::Chat chat

void
write(chat, who, message, flags)
	Gaim::Conversation::Chat chat
	const char *who
	const char *message
	int flags
CODE:
	gaim_conv_chat_write(chat, who, message, flags, time(NULL));

void
gaim_conv_chat_send(chat, message)
	Gaim::Conversation::Chat chat
	const char *message


MODULE = Gaim::Conversation::Chat  PACKAGE = Gaim  PREFIX = gaim_
PROTOTYPES: ENABLE

void
chats()
PREINIT:
	GList *l;
PPCODE:
	for (l = gaim_get_chats(); l != NULL; l = l->next)
	{
		XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data,
			"Gaim::Conversation")));
	}