Mercurial > pidgin

diff libpurple/plugins/perl/common/XMLNode.xs @ 27950:ba57b7deb58a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add Purple::XMLNode::get_name()
author Paul Aurich <paul@darkrain42.org>
date Tue, 18 Aug 2009 06:33:25 +0000
parents 491af22d8a01
children 1662dbdac18c
line wrap: on
line diff
--- a/libpurple/plugins/perl/common/XMLNode.xs	Tue Aug 18 06:23:44 2009 +0000
+++ b/libpurple/plugins/perl/common/XMLNode.xs	Tue Aug 18 06:33:25 2009 +0000
@@ -16,6 +16,14 @@
     PROTOTYPE: $
 
 const char *
+xmlnode_get_name(node)
+	Purple::XMLNode node
+	CODE:
+	RETVAL = node->name;
+	OUTPUT:
+	RETVAL
+
+const char *
 xmlnode_get_attrib(node, attr)
 	Purple::XMLNode node
 	const char *attr