ki-rin body parts

Use horse/unicorn body parts.  The result for HAIR is "mane"
which is appropriate.  There's no field for SKIN so the question
of whether to specify "scales" is moot.  (Snakes and dragons
describe HAIR as "scales" but that wouldn't be right for ki-rin.)

diff --git a/doc/fixes37.0 b/doc/fixes37.0
index 83aa7625f7e4b7d22d658a70907a39381278976c..f3c9134a9a6a68b79a97068db9e96186438ec7c1 100644 (file)
--- a/doc/fixes37.0
+++ b/doc/fixes37.0
@@ -1,4 +1,4 @@
-NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.357 $ $NHDT-Date: 1605927391 2020/11/21 02:56:31 $
+NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.358 $ $NHDT-Date: 1605959203 2020/11/21 11:46:43 $
 
 General Fixes and Modified Features
 -----------------------------------
@@ -298,8 +298,8 @@ if a monster threw a cocktrice egg at the hero but hit and petrified another
 update persistent inventory when putting on a helmet causes it to auto-curse
 since ki-rin look quite a bit like unicorns, make them be more like one:
        allow them to use their own horn to cure themselves; remove M1_ANIMAL,
-       change MS_NEIGH to MS_SPELL, add MR_POISON; they're still 'A' rather
-       than 'u' and don't care about gems
+       change MS_NEIGH to MS_SPELL, add MR_POISON, use horse body parts;
+       they're still 'A' rather than 'u' and don't care about gems
 wand or scroll of create monster that makes a new monster which can be seen
        or sensed becomes discovered but was doing so even for a concealed
        mimic seen as furniture or an object

diff --git a/src/polyself.c b/src/polyself.c
index 5beef979f6d30e4d26c21429f6eb260bfd21c88a..ccc076076ea9084d20bfc3a482739571fda1ef2f 100644 (file)
--- a/src/polyself.c
+++ b/src/polyself.c
@@ -1,4 +1,4 @@
-/* NetHack 3.7 polyself.c      $NHDT-Date: 1596498197 2020/08/03 23:43:17 $  $NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.155 $ */
+/* NetHack 3.7 polyself.c      $NHDT-Date: 1605959204 2020/11/21 11:46:44 $  $NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.157 $ */
 /*      Copyright (C) 1987, 1988, 1989 by Ken Arromdee */
 /* NetHack may be freely redistributed.  See license for details. */
 
@@ -1783,6 +1783,7 @@ int part;
     if (mptr == &mons[PM_RAVEN])
         return bird_parts[part];
     if (mptr->mlet == S_CENTAUR || mptr->mlet == S_UNICORN
+        || mptr == &mons[PM_KI_RIN]
         || (mptr == &mons[PM_ROTHE] && part != HAIR))
         return horse_parts[part];
     if (mptr->mlet == S_LIGHT) {