Net: Buffer outgoing messages

[d2df-sdl.git] / src / game / g_window.pas

diff --git a/src/game/g_window.pas b/src/game/g_window.pas
index dcd01756f8c7b58c9460a24df21dbcf19bf6c7b1..d703ea2fc2088a829bfa3af1bf07b83d31b44f16 100644 (file)
--- a/src/game/g_window.pas
+++ b/src/game/g_window.pas
@@ -789,7 +789,6 @@ var
 procedure ProcessLoading (forceUpdate: Boolean=false);
 var
   ev: TSDL_Event;
-  ID: LongWord;
   stt: UInt64;
 begin
   FillChar(ev, sizeof(ev), 0);
@@ -826,10 +825,11 @@ begin
 
     if forceUpdate then
     begin
-      DrawMenuBackground('INTER', ID);
+      DrawMenuBackground('INTER');
       e_DarkenQuadWH(0, 0, gScreenWidth, gScreenHeight, 150);
 
       DrawLoadingStat();
+      g_Console_Draw(True);
       SwapBuffers();
     end;
   end;
@@ -901,6 +901,8 @@ begin
     else if (NetMode = NET_CLIENT) then g_Net_Client_Update();
   end;
 
+  if NetMode = NET_SERVER then g_Net_Flush();
+
   g_Map_ProfilersEnd();
   g_Mons_ProfilersEnd();