# HG changeset patch
# User Sadrul Habib Chowdhury <imadil@gmail.com>
# Date 1229040100 0
# Node ID bf2ca2c5ac40c1191aee8eb861124bc02d0e2b3e
# Parent  34b02adafd9bcd2ed262af0047e7e744e4d4f7fd
Use av_len in the same manner as everywhere else, for consistency.

diff -r 34b02adafd9b -r bf2ca2c5ac40 libpurple/plugins/perl/common/Certificate.xs
--- a/libpurple/plugins/perl/common/Certificate.xs	Thu Dec 11 22:36:47 2008 +0000
+++ b/libpurple/plugins/perl/common/Certificate.xs	Fri Dec 12 00:01:40 2008 +0000
@@ -231,8 +231,8 @@
 		int len = 0, i = 0;
 		struct cb_data *d = NULL;
 	PPCODE:
-		len = av_len(cert_chain) + 1;
-		for(i = 0; i < len; i++) {
+		len = av_len(cert_chain);
+		for(i = 0; i <= len; i++) {
 			SV **sv = av_fetch(cert_chain, i, 0);
 			if(!sv || !purple_perl_is_ref_object(*sv)) {
 				g_list_free(l);