changeset 31709: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