diff src/perl.c @ 2712:d17c504adc36

[gaim-migrate @ 2725] more perl fixes from Dennis Lambe Jr. (malsyned) committer: Tailor Script <tailor@pidgin.im>
author Eric Warmenhoven <eric@warmenhoven.org>
date Tue, 13 Nov 2001 06:36:27 +0000
parents c17afaccaf09
children b1e300a85678
line wrap: on
line diff
--- a/src/perl.c	Tue Nov 13 06:30:37 2001 +0000
+++ b/src/perl.c	Tue Nov 13 06:36:27 2001 +0000
@@ -612,7 +612,7 @@
 	if (!c)
 		c = new_conversation(nick);
 	set_convo_gc(c, gc);
-	write_to_conv(c, what, WFLAG_SEND, NULL, time((time_t)NULL));
+	write_to_conv(c, what, WFLAG_SEND | (isauto ? WFLAG_AUTO : 0), NULL, time((time_t)NULL));
 	serv_send_im(c->gc, nick, what, isauto ? IM_FLAG_AWAY : 0);
 	XSRETURN(0);
 }