--- 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; }