diff src/perl.c @ 940:9fca1293f871

[gaim-migrate @ 950] Patches from kylev committer: Tailor Script <tailor@pidgin.im>
author Rob Flynn <gaim@robflynn.com>
date Sun, 01 Oct 2000 00:20:03 +0000
parents 2876c40108cd
children 1d021b2eb65d
line wrap: on
line diff
--- a/src/perl.c	Sun Oct 01 00:06:43 2000 +0000
+++ b/src/perl.c	Sun Oct 01 00:20:03 2000 +0000
@@ -330,7 +330,7 @@
 {
 	struct buddy *buddy;
 	struct group *g;
-	GList *list = groups;
+	GSList *list = groups;
 	GList *mem;
 	int i = 0;
 	dXSARGS;
@@ -344,7 +344,7 @@
 			XST_mPV(i++, buddy->name);
 			mem = mem->next;
 		}
-		list = list->next;
+		list = g_slist_next(list);
 	}
 	XSRETURN(i);
 }
@@ -353,7 +353,7 @@
 {
 	struct buddy *b;
 	struct group *g;
-	GList *list = groups;
+	GSList *list = groups;
 	GList *mem;
 	int i = 0;
 	dXSARGS;
@@ -367,7 +367,7 @@
 			if (b->present) XST_mPV(i++, b->name);
 			mem = mem->next;
 		}
-		list = list->next;
+		list = g_slist_next(list);
 	}
 	XSRETURN(i);
 }