Mercurial > pidgin
changeset 11119:db8682734dab
[gaim-migrate @ 13175]
*** empty log message ***
committer: Tailor Script <tailor@pidgin.im>
| author | John H. Kelm <johnkelm@gmail.com> |
|---|---|
| date | Mon, 18 Jul 2005 13:40:15 +0000 |
| parents | 134d0001983d |
| children | 35f2e6411966 |
| files | plugins/perl/common/BuddyList_Buddy.xs plugins/perl/common/BuddyList_Chat.xs plugins/perl/common/ConvWindow.xs plugins/perl/common/Conversation_Chat.xs plugins/perl/common/Conversation_IM.xs |
| diffstat | 5 files changed, 0 insertions(+), 340 deletions(-) [+] |
line wrap: on
line diff
--- a/plugins/perl/common/BuddyList_Buddy.xs Mon Jul 18 13:37:38 2005 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,75 +0,0 @@ -#include "module.h" - -MODULE = Gaim::BuddyList::Buddy PACKAGE = Gaim::BuddyList::Buddy PREFIX = gaim_buddy_ -PROTOTYPES: ENABLE - -Gaim::BuddyList::Buddy -new(account, name, alias) - Gaim::Account account - const char *name - const char *alias -CODE: - RETVAL = gaim_buddy_new(account, name, alias); -OUTPUT: - RETVAL - -void -rename(buddy, new_name) - Gaim::BuddyList::Buddy buddy - const char *new_name -CODE: - gaim_blist_rename_buddy(buddy, new_name); - -void -set_alias(buddy, alias) - Gaim::BuddyList::Buddy buddy - const char *alias -CODE: - gaim_blist_alias_buddy(buddy, alias); - -void -set_server_alias(buddy, alias) - Gaim::BuddyList::Buddy buddy - const char *alias -CODE: - gaim_blist_server_alias_buddy(buddy, alias); - -const char * -get_name(buddy) - Gaim::BuddyList::Buddy buddy -CODE: - RETVAL = buddy->name; -OUTPUT: - RETVAL - -Gaim::Account -get_account(buddy) - Gaim::BuddyList::Buddy buddy -CODE: - RETVAL = buddy->account; -OUTPUT: - RETVAL - -const char * -get_alias_only(buddy) - Gaim::BuddyList::Buddy buddy -CODE: - RETVAL = gaim_buddy_get_alias_only(buddy); -OUTPUT: - RETVAL - -const char * -get_alias(buddy) - Gaim::BuddyList::Buddy buddy -CODE: - RETVAL = gaim_buddy_get_alias(buddy); -OUTPUT: - RETVAL - -Gaim::BuddyList::Group -get_group(buddy) - Gaim::BuddyList::Buddy buddy -CODE: - RETVAL = gaim_find_buddys_group(buddy); -OUTPUT: - RETVAL
--- a/plugins/perl/common/BuddyList_Chat.xs Mon Jul 18 13:37:38 2005 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,35 +0,0 @@ -#include "module.h" - -MODULE = Gaim::BuddyList::Chat PACKAGE = Gaim::BuddyList::Chat PREFIX = gaim_chat_ -PROTOTYPES: ENABLE - -void -set_alias(chat, alias) - Gaim::BuddyList::Chat chat - const char *alias -CODE: - gaim_blist_alias_chat(chat, alias); - -const char * -gaim_chat_get_name(chat) - Gaim::BuddyList::Chat chat -CODE: - RETVAL = gaim_chat_get_name(chat); -OUTPUT: - RETVAL - -Gaim::BuddyList::Group -gaim_chat_get_group(chat) - Gaim::BuddyList::Chat chat -CODE: - RETVAL = gaim_chat_get_group(chat); -OUTPUT: - RETVAL - -Gaim::Account -get_account(chat) - Gaim::BuddyList::Chat chat -CODE: - RETVAL = chat->account; -OUTPUT: - RETVAL
--- a/plugins/perl/common/ConvWindow.xs Mon Jul 18 13:37:38 2005 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,73 +0,0 @@ -#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 - -int -gaim_conv_window_add_conversation(win, conv) - Gaim::ConvWindow win - Gaim::Conversation conv - -Gaim::Conversation -gaim_conv_window_remove_conversation(win, conv) - Gaim::ConvWindow win - Gaim::Conversation conv - -size_t -gaim_conv_window_get_conversation_count(win) - Gaim::ConvWindow win - -void -gaim_conv_window_switch_conversation(win, conv) - Gaim::ConvWindow win - Gaim::Conversation conv - -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")));
--- a/plugins/perl/common/Conversation_Chat.xs Mon Jul 18 13:37:38 2005 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,104 +0,0 @@ -#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"))); - }
--- a/plugins/perl/common/Conversation_IM.xs Mon Jul 18 13:37:38 2005 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,53 +0,0 @@ -#include "module.h" - -MODULE = Gaim::Conversation::IM PACKAGE = Gaim::Conversation::IM PREFIX = gaim_conv_im_ -PROTOTYPES: ENABLE - -Gaim::Conversation::IM -new(account, name) - Gaim::Account account - const char *name -CODE: - RETVAL = GAIM_CONV_IM(gaim_conversation_new(GAIM_CONV_IM, account, name)); -OUTPUT: - RETVAL - -void -DESTROY(im) - Gaim::Conversation::IM im -CODE: - gaim_conversation_destroy(gaim_conv_im_get_conversation(im)); - - -Gaim::Conversation -gaim_conv_im_get_conversation(im) - Gaim::Conversation::IM im - -void -gaim_conv_im_write(im, who, message, flags) - Gaim::Conversation::IM im - const char *who - const char *message - int flags -CODE: - gaim_conv_im_write(im, who, message, flags, time(NULL)); - -void -gaim_conv_im_send(im, message) - Gaim::Conversation::IM im - const char *message - - -MODULE = Gaim::Conversation::IM PACKAGE = Gaim PREFIX = gaim_ -PROTOTYPES: ENABLE - -void -ims() -PREINIT: - GList *l; -PPCODE: - for (l = gaim_get_ims(); l != NULL; l = l->next) - { - XPUSHs(sv_2mortal(gaim_perl_bless_object(GAIM_CONV_IM(l->data), - "Gaim::Conversation"))); - }