# HG changeset patch
# User frosch <frosch@openttd.org>
# Date 2011-07-17 16:09:38
# Node ID e1b49fc0b45989ced718e499cb3265ec94580c91
# Parent  5b083a56ed268d7616651f5560d4e9f17dd822bc

(svn r22670) -Change: Do not spawn explosion effects when bulldozing in paused mode. They block the view.

diff --git a/src/landscape.cpp b/src/landscape.cpp
--- a/src/landscape.cpp
+++ b/src/landscape.cpp
@@ -690,9 +690,10 @@ CommandCost CmdClearArea(TileIndex tile,
 			}
 			DoCommand(t, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
 
-			/* draw explosion animation... */
+			/* draw explosion animation...
+			 * Disable explosions when game is paused. Looks silly and blocks the view. */
 			TileIndex off = t - ta.tile;
-			if ((TileX(off) == 0 || TileX(off) == ta.w - 1U) && (TileY(off) == 0 || TileY(off) == ta.h - 1U)) {
+			if ((TileX(off) == 0 || TileX(off) == ta.w - 1U) && (TileY(off) == 0 || TileY(off) == ta.h - 1U) && _pause_mode == PM_UNPAUSED) {
 				/* big explosion in each corner, or small explosion for single tiles */
 				CreateEffectVehicleAbove(TileX(t) * TILE_SIZE + TILE_SIZE / 2, TileY(t) * TILE_SIZE + TILE_SIZE / 2, 2,
 					ta.w == 1 && ta.h == 1 ? EV_EXPLOSION_SMALL : EV_EXPLOSION_LARGE