diff plugins/perl/common/BuddyList_Chat.xs @ 6699:12169973c663

[gaim-migrate @ 7225] Perl compiles with the new contact stuff. committer: Tailor Script <tailor@pidgin.im>
author Christian Hammond <chipx86@chipx86.com>
date Tue, 02 Sep 2003 03:56:08 +0000
parents fe0294504602
children b0913ab92893
line wrap: on
line diff
--- a/plugins/perl/common/BuddyList_Chat.xs	Tue Sep 02 03:54:52 2003 +0000
+++ b/plugins/perl/common/BuddyList_Chat.xs	Tue Sep 02 03:56:08 2003 +0000
@@ -13,6 +13,10 @@
 const char *
 gaim_chat_get_display_name(chat)
 	Gaim::BuddyList::Chat chat
+CODE:
+	RETVAL = gaim_blist_chat_get_display_name(chat);
+OUTPUT:
+	RETVAL
 
 Gaim::BuddyList::Group
 gaim_blist_chat_get_group(chat)
@@ -32,6 +36,10 @@
 gaim_chat_get_setting(chat, key)
 	Gaim::BuddyList::Chat chat
 	const char *key
+CODE:
+	RETVAL = gaim_blist_chat_get_setting(chat, key);
+OUTPUT:
+	RETVAL
 
 Gaim::Account
 get_account(chat)