Elves and rangers get alignment penalty for cutting down trees

diff --git a/doc/fixes3-7-0.txt b/doc/fixes3-7-0.txt
index 0a5fa44ce1439ae1a41353f35f4653ea7b3f38bb..15bc41d8b70a51259f4bd856ba19f5e4483aa201 100644 (file)
--- a/doc/fixes3-7-0.txt
+++ b/doc/fixes3-7-0.txt
@@ -805,6 +805,7 @@ replace monk starting sleep spell with confuse monster
 chargeable rings have a chance of getting charged when hit with electricity
 flint and hard gems break less often when thrown
 hobbits getting a sling also get some ammo for it
+elves and rangers get alignment penalty for cutting down trees
 
 
 Fixes to 3.7.0-x Problems that Were Exposed Via git Repository

diff --git a/src/dig.c b/src/dig.c
index aabc43831bdf7c794ca22100f21fac031bea2257..063b531ff14381e38631f3e1e8d48c8934685df6 100644 (file)
--- a/src/dig.c
+++ b/src/dig.c
@@ -389,6 +389,8 @@ dig(void)
                 lev->typ = ROOM, lev->flags = 0;
                 if (!rn2(5))
                     (void) rnd_treefruit_at(dpx, dpy);
+                if (Race_if(PM_ELF) || Role_if(PM_RANGER))
+                    adjalign(-1);
             } else {
                 digtxt = "You succeed in cutting away some rock.";
                 lev->typ = CORR, lev->flags = 0;