comparison src/perl.c @ 3033:1143524a2eaf

[gaim-migrate @ 3046] Laying the ground work for image send. Also an IRC fix. committer: Tailor Script <tailor@pidgin.im>
author Sean Egan <seanegan@gmail.com>
date Tue, 12 Mar 2002 17:21:46 +0000
parents b1e300a85678
children 2433056e9dab
comparison
equal deleted inserted replaced
3032:d3536105d581 3033:1143524a2eaf
584 584
585 if (!g_slist_find(connections, gc)) { 585 if (!g_slist_find(connections, gc)) {
586 XSRETURN(0); 586 XSRETURN(0);
587 return; 587 return;
588 } 588 }
589 serv_send_im(gc, nick, what, isauto); 589 serv_send_im(gc, nick, what, -1, isauto);
590 XSRETURN(0); 590 XSRETURN(0);
591 } 591 }
592 592
593 XS (XS_GAIM_print_to_conv) 593 XS (XS_GAIM_print_to_conv)
594 { 594 {
611 c = find_conversation(nick); 611 c = find_conversation(nick);
612 if (!c) 612 if (!c)
613 c = new_conversation(nick); 613 c = new_conversation(nick);
614 set_convo_gc(c, gc); 614 set_convo_gc(c, gc);
615 write_to_conv(c, what, WFLAG_SEND | (isauto ? WFLAG_AUTO : 0), NULL, time(NULL), -1); 615 write_to_conv(c, what, WFLAG_SEND | (isauto ? WFLAG_AUTO : 0), NULL, time(NULL), -1);
616 serv_send_im(c->gc, nick, what, isauto ? IM_FLAG_AWAY : 0); 616 serv_send_im(c->gc, nick, what, -1, isauto ? IM_FLAG_AWAY : 0);
617 XSRETURN(0); 617 XSRETURN(0);
618 } 618 }
619 619
620 XS (XS_GAIM_print_to_chat) 620 XS (XS_GAIM_print_to_chat)
621 { 621 {