Mercurial > pidgin
view plugins/perl/common/Conversation_Chat.xs @ 8630:ff2c1e946a5c
[gaim-migrate @ 9382]
Add an option for "No sounds when conversation has focus"
Thanks goes to nosnilmot, I think
committer: Tailor Script <tailor@pidgin.im>
author | Mark Doliner <mark@kingant.net> |
---|---|
date | Sun, 11 Apr 2004 16:09:06 +0000 |
parents | b14a7bc189b8 |
children |
line wrap: on
line source
#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"))); }