Merge branch 'k-sound' into NetHack-3.6

2019-11-18 15:14:55 -05:00
parent fbd10e4b0e 450957bfe9
commit 41299d44ae
1 changed files with 5 additions and 2 deletions
--- a/src/objnam.c
+++ b/src/objnam.c
@@ -2451,8 +2451,11 @@ const char *oldstr;
    if (index("zxs", lo_c)
        || (len >= 2 && lo_c == 'h' && index("cs", lowc(*(spot - 1)))
            /* 21st century k-sound */
-            && !(len >= 4 && !strcmpi(spot - 2, "ech")
-                && index("tm", lowc(*(spot - 4)))))
+            && !(len >= 4 &&
+                 ((lowc(*(spot - 2)) == 'e'
+                    && index("mt", lowc(*(spot - 3)))) ||
+                  (lowc(*(spot - 2)) == 'o'
+                    && index("lp", lowc(*(spot - 3)))))))
        /* Kludge to get "tomatoes" and "potatoes" right */
        || (len >= 4 && !strcmpi(spot - 2, "ato"))
        || (len >= 5 && !strcmpi(spot - 4, "dingo"))) {