--- a/hedgewars/uVisualGears.pas	Sun Jan 11 10:22:41 2009 +0000
+++ b/hedgewars/uVisualGears.pas	Sun Jan 11 11:03:09 2009 +0000
@@ -164,6 +164,13 @@
 	t: Longword;
 	sp: hwFloat;
 begin
+if (GameType = gmtSave) or (fastUntilLag and (GameType = gmtNet)) then // we're scrolling now
+	if Kind <> vgtCloud then
+		begin
+		AddVisualGear:= nil;
+		exit
+		end;
+
 New(Result);
 FillChar(Result^, sizeof(TVisualGear), 0);
 Result^.X:= int2hwFloat(X);