[DGD] DGD call_out doubled

[Larry Moore]

Whenever I send a call_out, I get double text. As an example, I wrote a command to highlight what I mean:

cocheck
Initializing call_out check.
Running callouts:  [1] call_out_check delay: 0

> Call_out check completed.
Call_out check completed.

The code: 
int cmd_cocheck(object body, string arg){
	mixed *st;
	string func;
	int i, sz;
	
	
	body->message("Initializing call_out check.\n");
	call_out("call_out_check", 0, body);	
	st = status(TO);
	if (!st[4]) return notify_fail(body, "No pending callouts.\n");
	sz = sizeof(st[4]);
	if (!sz) return notify_fail(body, "No pending callouts.\n");
	for (i=0;i<sz;i++) body->message("Running callouts:  ["+st[4][i][0]+"] " +st[4][i][1]+" delay: "+st[4][i][2]+"\n", "command");
	body->message("\n", "command");
	return TRUE;
}
void call_out_check(object body){
	body->message("Call_out check completed.\n", "command");
}

Did I miss something when I compiled DGD? I am using DGD v. 1.6

Larry Moore