|
@@ -397,7 +397,10 @@ begin
|
|
else
|
|
else
|
|
begin
|
|
begin
|
|
if status.use_redir then
|
|
if status.use_redir then
|
|
- writeln(status.redirfile,MsgTimeStr+MsgLocStr+MsgTypeStr+s)
|
|
|
|
|
|
+ begin
|
|
|
|
+ writeln(status.redirfile,MsgTimeStr+MsgLocStr+MsgTypeStr+s);
|
|
|
|
+ flush(status.redirfile);
|
|
|
|
+ end
|
|
else
|
|
else
|
|
begin
|
|
begin
|
|
write(MsgTimeStr+MsgLocStr);
|
|
write(MsgTimeStr+MsgLocStr);
|