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