Mercurial > pidgin.yaz
changeset 28298:ba57b7deb58a
Add Purple::XMLNode::get_name()
author | Paul Aurich <paul@darkrain42.org> |
---|---|
date | Tue, 18 Aug 2009 06:33:25 +0000 |
parents | 491af22d8a01 |
children | e5349d2cc7e5 |
files | ChangeLog.API libpurple/plugins/perl/common/XMLNode.xs |
diffstat | 2 files changed, 11 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/ChangeLog.API Tue Aug 18 06:23:44 2009 +0000 +++ b/ChangeLog.API Tue Aug 18 06:33:25 2009 +0000 @@ -154,6 +154,9 @@ * GntProgressBar and functions (Saleem Abdulrasool) perl: + Added: + * Purple::XMLNode::get_name() + Changed: * Made a bunch of functions act more perl-like. Call the new() functions as Class->new(...) instead of Class::new(...):
--- 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