From 450957bfe98e6b25b352f72dad9495cf08ed01ca Mon Sep 17 00:00:00 2001 From: nhmall Date: Mon, 18 Nov 2019 13:23:13 -0500 Subject: [PATCH] further refine k-sound pluralization --- src/objnam.c | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/src/objnam.c b/src/objnam.c index 796c90e84..9bc9148b4 100644 --- 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"))) {