Mercurial > pidgin
changeset 31260:3ff4467e4b46
Add some missing Perl conversation functions
| author | Daniel Atallah <daniel.atallah@gmail.com> |
|---|---|
| date | Mon, 28 Feb 2011 03:52:38 +0000 |
| parents | 531bcead5652 |
| children | 087395608ed9 |
| files | ChangeLog.API libpurple/plugins/perl/common/Conversation.xs |
| diffstat | 2 files changed, 23 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/ChangeLog.API Thu Feb 24 18:02:21 2011 +0000 +++ b/ChangeLog.API Mon Feb 28 03:52:38 2011 +0000 @@ -1,6 +1,11 @@ Pidgin and Finch: The Pimpin' Penguin IM Clients That're Good for the Soul version 2.7.11 (??/??/????): + * Perl: + Added: + * Purple::find_conversation_with_account + * Purple::Conversation::Chat::send_with_flags + * Purple::Conversation::IM::send_with_flags version 2.7.10 (02/06/2011): * No changes
--- a/libpurple/plugins/perl/common/Conversation.xs Thu Feb 24 18:02:21 2011 +0000 +++ b/libpurple/plugins/perl/common/Conversation.xs Mon Feb 28 03:52:38 2011 +0000 @@ -118,6 +118,12 @@ XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Conversation"))); } +Purple::Conversation +purple_find_conversation_with_account(type, name, account) + Purple::ConversationType type + const char *name + Purple::Account account + MODULE = Purple::Conversation PACKAGE = Purple::Conversations PREFIX = purple_conversations_ PROTOTYPES: ENABLE @@ -297,6 +303,12 @@ const char *message void +purple_conv_im_send_with_flags(im, message, flags) + Purple::Conversation::IM im + const char *message + Purple::MessageFlags flags + +void purple_conv_im_write(im, who, message, flags, mtime) Purple::Conversation::IM im const char *who @@ -410,6 +422,12 @@ const char * message void +purple_conv_chat_send_with_flags(chat, message, flags) + Purple::Conversation::Chat chat + const char * message + Purple::MessageFlags flags + +void purple_conv_chat_write(chat, who, message, flags, mtime) Purple::Conversation::Chat chat const char *who