From e7265f7d0b2581362c1067fdf6f58c4957b7af1f Mon Sep 17 00:00:00 2001
From: Michael Gernoth <michael@gernoth.net>
Date: Sun, 27 Jan 2008 14:16:57 +0100
Subject: [PATCH] don't wreck ships when disasters are disabled

---
 src/sim/w_sprite.c | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/src/sim/w_sprite.c b/src/sim/w_sprite.c
index ff1e679..3f50989 100644
--- a/src/sim/w_sprite.c
+++ b/src/sim/w_sprite.c
@@ -898,11 +898,13 @@ DoShipSprite(SimSprite *sprite)
     sprite->frame = 0;
     return;
   }
-  for (z = 0; z < 8; z++) {
-    if (t == BtClrTab[z]) break;
-    if (z == 7) {
-      ExplodeSprite(sprite);
-      Destroy(sprite->x + 48, sprite->y);
+  if (!NoDisasters) {
+    for (z = 0; z < 8; z++) {
+      if (t == BtClrTab[z]) break;
+      if (z == 7) {
+        ExplodeSprite(sprite);
+        Destroy(sprite->x + 48, sprite->y);
+      }
     }
   }
 }
-- 
2.39.5