Mercurial > pidgin.yaz

diff plugins/perl/common/Status.xs @ 11290:b284c703d398

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[gaim-migrate @ 13490] Did some house cleaning on the code finished up some of the "TODO" stuff that was left over from when I originally did the XSUBs. Furthermore, the dynamically loaded Perl package problems should be corrected now that the context is set before one of the concurrent perl interpreters is run. committer: Tailor Script <tailor@pidgin.im>
author John H. Kelm <johnkelm@gmail.com>
date Thu, 18 Aug 2005 01:35:14 +0000
parents ecbbe6d18b0d
children 30947631262d
line wrap: on
line diff
--- a/plugins/perl/common/Status.xs	Wed Aug 17 21:42:28 2005 +0000
+++ b/plugins/perl/common/Status.xs	Thu Aug 18 01:35:14 2005 +0000
@@ -1,4 +1,3 @@
-
 #include "module.h"
 
 /* TODO
@@ -26,6 +25,11 @@
 	Gaim::Value attr_value
 	...
 
+*/
+
+MODULE = Gaim::Status  PACKAGE = Gaim::Presence  PREFIX = gaim_presence_
+PROTOTYPES: ENABLE
+
 void 
 gaim_presence_add_list(presence, source_list)
 	Gaim::Presence presence
@@ -43,12 +47,6 @@
 	}
 	gaim_presence_add_list(presence, t_GL);
 	
-*/
-
-/***************************XS Code Status.xs**************************/
-MODULE = Gaim::Status  PACKAGE = Gaim::Presence  PREFIX = gaim_presence_
-PROTOTYPES: ENABLE
-
 void 
 gaim_presence_add_status(presence, status)
 	Gaim::Presence presence