/pidgin/main: a0a7336aa941: Fix Perl plugin stuff.

[Elliott Sales de Andrade]

Changeset: a0a7336aa941321382622e7610871a547322f01c
Author:	 Elliott Sales de Andrade <qulogic at pidgin.im>
Date:	 2013-01-18 02:09 -0500
Branch:	 default
URL: http://hg.pidgin.im/pidgin/main/rev/a0a7336aa941

Description:

Fix Perl plugin stuff.

diffstat:

 libpurple/plugins/perl/common/Certificate.xs |  14 +++++++++++++-
 libpurple/plugins/perl/common/Pounce.xs      |   3 ---
 2 files changed, 13 insertions(+), 4 deletions(-)

diffs (38 lines):

diff --git a/libpurple/plugins/perl/common/Certificate.xs b/libpurple/plugins/perl/common/Certificate.xs
--- a/libpurple/plugins/perl/common/Certificate.xs
+++ b/libpurple/plugins/perl/common/Certificate.xs
@@ -43,8 +43,20 @@ BOOT:
 
 	static const constiv *civ, const_iv[] = {
 #define const_iv(name) {#name, (IV)PURPLE_CERTIFICATE_##name}
-		const_iv(INVALID),
+		const_iv(UNKNOWN_ERROR),
 		const_iv(VALID),
+		const_iv(NON_FATALS_MASK),
+		const_iv(SELF_SIGNED),
+		const_iv(CA_UNKNOWN),
+		const_iv(NOT_ACTIVATED),
+		const_iv(EXPIRED),
+		const_iv(NAME_MISMATCH),
+		const_iv(NO_CA_POOL),
+		const_iv(FATALS_MASK),
+		const_iv(INVALID_CHAIN),
+		const_iv(REVOKED),
+		const_iv(REJECTED),
+		const_iv(LAST),
 	};
 
 	for (civ = const_iv + sizeof(const_iv) / sizeof(const_iv[0]); civ-- > const_iv; )
diff --git a/libpurple/plugins/perl/common/Pounce.xs b/libpurple/plugins/perl/common/Pounce.xs
--- a/libpurple/plugins/perl/common/Pounce.xs
+++ b/libpurple/plugins/perl/common/Pounce.xs
@@ -121,9 +121,6 @@ PPCODE:
 Purple::Handle
 purple_pounces_get_handle()
 
-gboolean
-purple_pounces_load()
-
 void
 purple_pounces_unregister_handler(ui)
 	const char *ui