From 2d38b12399a2d88f748ff6f203189d70742b4255 Mon Sep 17 00:00:00 2001
From: jc_gargma <jc_gargma@iserlohn-fortress.net>
Date: Tue, 13 Aug 2024 14:02:17 -0700
Subject: Add patch fixing triffid queens digging into the center of the Earth.

---
 src-19_triffids-do-not-burrow.patch | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100644 src-19_triffids-do-not-burrow.patch

(limited to 'src-19_triffids-do-not-burrow.patch')

diff --git a/src-19_triffids-do-not-burrow.patch b/src-19_triffids-do-not-burrow.patch
new file mode 100644
index 0000000..b7d422b
--- /dev/null
+++ b/src-19_triffids-do-not-burrow.patch
@@ -0,0 +1,17 @@
+--- a/src/monattack.cpp
++++ b/src/monattack.cpp
+@@ -1450,9 +1450,12 @@
+             continue;
+         }
+ 
++        // 1 in 3 chance to terraform diggable terrain
+         if( g->m.is_bashable( p ) && one_in( 3 ) ) {
+-            // Destroy everything
+-            g->m.destroy( p );
++            if( g->m.has_furn( p ) ) {
++                // Destroy any furniture
++                g->m.destroy_furn( p );
++            }
+             // And then make the ground fertile
+             g->m.ter_set( p, t_dirtmound );
+             continue;
-- 
cgit v1.2.1