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 7f62258a5881369267e3f33e35bbb296b18fdc78..45a7e05c59c49379434990b51e290c7578e51c2c 100644 (file)
--- 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 */