Mercurial > pidgin.yaz
diff src/perl.c @ 4476:62c1e5e656d0
[gaim-migrate @ 4751]
gaim_conversation_new() now takes an aim_user parameter. This should fix
the new placement grouping bugs, as the default "user" (account)
selected was the first account in the list of connections. There may be
side-effects, especially with perl plugins, but I'm not sure. Please report
anything odd that you see as a result of this.
committer: Tailor Script <tailor@pidgin.im>
author | Christian Hammond <chipx86@chipx86.com> |
---|---|
date | Thu, 30 Jan 2003 18:45:50 +0000 |
parents | 25c2119deab3 |
children | 3196d9044a45 |
line wrap: on
line diff
--- a/src/perl.c Thu Jan 30 18:38:34 2003 +0000 +++ b/src/perl.c Thu Jan 30 18:45:50 2003 +0000 @@ -781,12 +781,12 @@ case 2: wflags=WFLAG_SYSTEM; break; default: wflags=WFLAG_RECV; } - + c = gaim_find_conversation(nick); if (!c) - c = gaim_conversation_new(GAIM_CONV_IM, nick); - + c = gaim_conversation_new(GAIM_CONV_IM, NULL, nick); + gaim_conversation_write(c, who, what, -1, wflags, time(NULL)); XSRETURN(0); } @@ -831,10 +831,14 @@ XSRETURN(0); return; } + c = gaim_find_conversation(nick); + if (!c) - c = gaim_conversation_new(GAIM_CONV_IM, nick); - gaim_conversation_set_user(c, gc->user); + c = gaim_conversation_new(GAIM_CONV_IM, gc->user, nick); + else + gaim_conversation_set_user(c, gc->user); + gaim_conversation_write(c, NULL, what, -1, (WFLAG_SEND | (isauto ? WFLAG_AUTO : 0)), time(NULL));