comparison src/perl.c @ 980:82c5865f7cfe

[gaim-migrate @ 990] i hope this works committer: Tailor Script <tailor@pidgin.im>
author Eric Warmenhoven <eric@warmenhoven.org>
date Thu, 12 Oct 2000 18:59:36 +0000
parents 2586b2a3725e
children 38452403563b
comparison
equal deleted inserted replaced
979:ae6d13c11570 980:82c5865f7cfe
459 XSRETURN(7); 459 XSRETURN(7);
460 } 460 }
461 461
462 XS (XS_AIM_print_to_conv) 462 XS (XS_AIM_print_to_conv)
463 { 463 {
464 /* FIXME
464 char *nick, *what; 465 char *nick, *what;
465 struct conversation *c; 466 struct conversation *c;
466 int junk; 467 int junk;
467 dXSARGS; 468 dXSARGS;
468 items = 0; 469 items = 0;
472 c = find_conversation(nick); 473 c = find_conversation(nick);
473 if (!c) 474 if (!c)
474 c = new_conversation(nick); 475 c = new_conversation(nick);
475 write_to_conv(c, what, WFLAG_SEND, NULL); 476 write_to_conv(c, what, WFLAG_SEND, NULL);
476 serv_send_im(nick, what, 0); 477 serv_send_im(nick, what, 0);
478 */
477 } 479 }
478 480
479 XS (XS_AIM_print_to_chat) 481 XS (XS_AIM_print_to_chat)
480 { 482 {
481 /* FIXME: need to make this multi-connection based 483 /* FIXME: need to make this multi-connection based