changeset 30269:e874875a74a7

Make it possible for perl plugins to connect to log-signals.
author Sadrul Habib Chowdhury <imadil@gmail.com>
date Mon, 19 Jul 2010 18:25:47 +0000
parents a37aa0ddfc0f
children adef21420870 47b6eda87723 47fc498fc34b
files ChangeLog.API libpurple/plugins/perl/common/Log.xs
diffstat 2 files changed, 7 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/ChangeLog.API	Sat Jul 17 23:28:20 2010 +0000
+++ b/ChangeLog.API	Mon Jul 19 18:25:47 2010 +0000
@@ -7,6 +7,10 @@
 		  called for a protocol that doesn't support the underlying
 		  calls and the caller does not specify a failure callback.
 
+	Perl:
+		Added:
+		* Exposed log-subsystem signals.
+
 	Pidgin:
 		Changed:
 		* Changing the visibility (gtk_widget_hide/show) of
--- a/libpurple/plugins/perl/common/Log.xs	Sat Jul 17 23:28:20 2010 +0000
+++ b/libpurple/plugins/perl/common/Log.xs	Mon Jul 19 18:25:47 2010 +0000
@@ -27,6 +27,9 @@
 		newCONSTSUB(flags_stash, (char *)civ->name, newSViv(civ->iv));
 }
 
+Purple::Handle
+purple_log_get_handle()
+
 int
 purple_log_common_sizer(log)
 	Purple::Log log