# HG changeset patch
# User Sadrul Habib Chowdhury <imadil@gmail.com>
# Date 1279563947 0
# Node ID e874875a74a7273703bcb2282cc52a02f7061079
# Parent  a37aa0ddfc0fb91078e681210d744c673049f415
Make it possible for perl plugins to connect to log-signals.

diff -r a37aa0ddfc0f -r e874875a74a7 ChangeLog.API
--- 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
diff -r a37aa0ddfc0f -r e874875a74a7 libpurple/plugins/perl/common/Log.xs
--- 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