--- a/libpurple/plugins/tcl/tcl_cmds.c Thu May 22 19:36:16 2014 +0200 +++ b/libpurple/plugins/tcl/tcl_cmds.c Thu May 22 20:20:19 2014 +0200 @@ -874,7 +874,7 @@ flags = PURPLE_MESSAGE_SYSTEM; break; } - purple_conversation_write_message(convo, from, what, flags, time(NULL)); + purple_conversation_write_message(convo, purple_message_new(from, what, flags)); break; case CMD_CONV_NAME: if (objc != 3) {