From e9d501fca085dc074f6873aa80907fdf29fdeea0 Mon Sep 17 00:00:00 2001
From: "jan.nijtmans" <nijtmans@users.sourceforge.net>
Date: Wed, 20 Mar 2024 20:40:56 +0000
Subject: put back line accidently removed

---
 generic/tclStringObj.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c
index dba36a6..10faa02 100644
--- a/generic/tclStringObj.c
+++ b/generic/tclStringObj.c
@@ -618,6 +618,7 @@ TclGetUniChar(
 	return -1;
     }
     const char *begin = TclUtfAtIndex(objPtr->bytes, index);
+    TclUtfToUniChar(begin, &ch);
     return ch;
 }
 
-- 
cgit v0.12