libpurple/plugins/tcl/tcl_cmds.c

branch
soc.2013.gobjectification.plugins
changeset 37101
8ba9a23354ff
parent 37075
cf3f735b09b7
parent 35499
c4c5e0a670b1
child 37146
b5b9c75a4b54
--- a/libpurple/plugins/tcl/tcl_cmds.c	Mon Feb 10 00:16:53 2014 +0530
+++ b/libpurple/plugins/tcl/tcl_cmds.c	Mon Feb 10 01:09:47 2014 +0530
@@ -475,11 +475,11 @@
 			}
 			if ((account = tcl_validate_account(elems[2], interp)) == NULL)
 				return TCL_ERROR;
-			serv_get_info(purple_account_get_connection(account), Tcl_GetString(elems[1]));
+			purple_serv_get_info(purple_account_get_connection(account), Tcl_GetString(elems[1]));
 		} else {
 			if ((account = tcl_validate_account(objv[2], interp)) == NULL)
 				return TCL_ERROR;
-			serv_get_info(purple_account_get_connection(account), Tcl_GetString(objv[3]));
+			purple_serv_get_info(purple_account_get_connection(account), Tcl_GetString(objv[3]));
 		}
 		break;
 	case CMD_BUDDY_LIST:
@@ -1410,7 +1410,7 @@
 	who = Tcl_GetString(objv[2]);
 	text = Tcl_GetString(objv[3]);
 
-	serv_send_im(gc, who, text, 0);
+	purple_serv_send_im(gc, who, text, 0);
 
 	return TCL_OK;
 }

mercurial