libpurple/plugins/tcl/tcl_cmds.c

branch
release-2.1.0
changeset 18190
bcf28ef7e8ff
parent 18122
9bf9970c1b6a
child 19726
22a31d50bab5
--- a/libpurple/plugins/tcl/tcl_cmds.c	Sat Jun 16 19:21:06 2007 +0000
+++ b/libpurple/plugins/tcl/tcl_cmds.c	Sat Jun 16 19:44:59 2007 +0000
@@ -113,7 +113,7 @@
 	const char *listopts[] = { "-all", "-online", NULL };
 	enum { CMD_ACCOUNTLIST_ALL, CMD_ACCOUNTLIST_ONLINE } listopt;
 	const char *alias;
-	const GList *cur;
+	GList *cur;
 	PurpleAccount *account;
 	PurpleStatus *status;
 	PurpleStatusType *status_type;
@@ -1082,7 +1082,7 @@
 	Tcl_Obj *result = Tcl_GetObjResult(interp);
 	Tcl_Obj *list, *elem;
 	PurplePresence *presence;
-	const GList *cur;
+	GList *cur;
 	int error, idle, idle_time, login_time;
 
 	if (objc < 2) {
@@ -1524,7 +1524,7 @@
 	Tcl_Obj *result = Tcl_GetObjResult(interp);
 	PurpleStatusType *status_type;
 	Tcl_Obj *list, *elem;
-	const GList *cur;
+	GList *cur;
 	int error;
 
 	if (objc < 2) {

mercurial