From: Pasi Kallinen <paxed@alt.org>
Date: Mon, 20 Jun 2016 09:56:55 +0000 (+0300)
Subject: Tame simians with bananas
X-Git-Tag: NetHack-3.6.1_RC01~663
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=16118580d5325b8da0be339f0a6cea333c13ecc3;p=nethack

Tame simians with bananas

Bananas are quite rare, and none of the simians are very strong,
so this won't be in any way overpowered - just a bit of flavor.

I think this was originally Derek's change from Sporkhack, but
similar ones have been done in the community multiple times
in the past.
---

diff --git a/include/mondata.h b/include/mondata.h
index 7f62258a5..45a7e05c5 100644
--- a/include/mondata.h
+++ b/include/mondata.h
@@ -194,6 +194,10 @@
      || ((ptr)->mlet == S_PUDDING && (ptr) != &mons[PM_BLACK_PUDDING]))
 
 #define befriend_with_obj(ptr, obj) \
-    ((obj)->oclass == FOOD_CLASS && is_domestic(ptr))
+    ((obj)->oclass == FOOD_CLASS && is_domestic(ptr)                    \
+     || ((obj)->otyp == BANANA &&                                       \
+         ((ptr) == &mons[PM_MONKEY]                                     \
+          || (ptr) == &mons[PM_APE]                                     \
+          || (ptr) == &mons[PM_CARNIVOROUS_APE])))
 
 #endif /* MONDATA_H */