--- a/hedgewars/uWorld.pas	Thu Sep 10 12:23:31 2009 +0000
+++ b/hedgewars/uWorld.pas	Thu Sep 10 12:42:01 2009 +0000
@@ -296,6 +296,17 @@
     end;
 
 begin
+if ZoomValue < zoom then
+	begin
+	zoom:= zoom - 0.001 * Lag;
+	if zoom < ZoomValue then zoom:= ZoomValue
+	end else
+if ZoomValue > zoom then
+	begin
+	zoom:= zoom + 0.001 * Lag;
+	if zoom > ZoomValue then zoom:= ZoomValue
+	end;
+	
 // Sky
 glClear(GL_COLOR_BUFFER_BIT);
 glEnable(GL_BLEND);