From baa12a413fd4b9320b0a9d546f0927643945a57c Mon Sep 17 00:00:00 2001
From: Jun-ichi Takimoto <takimoto-j@kba.biglobe.ne.jp>
Date: Wed, 20 Apr 2022 21:01:08 +0900
Subject: 50080: add missing STOUC() in casemodify()

---
 Src/hist.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'Src')

diff --git a/Src/hist.c b/Src/hist.c
index f9440dba7..bff0abe61 100644
--- a/Src/hist.c
+++ b/Src/hist.c
@@ -2254,10 +2254,10 @@ casemodify(char *str, int how)
 	    int c;
 	    int mod = 0;
 	    if (*str == Meta) {
-		c = str[1] ^ 32;
+		c = STOUC(str[1] ^ 32);
 		str += 2;
 	    } else
-		c = *str++;
+		c = STOUC(*str++);
 	    switch (how) {
 	    case CASMOD_LOWER:
 		if (isupper(c)) {
-- 
cgit 1.4.1