From 2ce78dbcc2f05692112c692a562a08b477ff06ab Mon Sep 17 00:00:00 2001
From: "jan.nijtmans" <nijtmans@users.sourceforge.net>
Date: Tue, 30 Jan 2024 10:27:57 +0000
Subject: tk::endOfGlyphCluster doesn't exist

---
 library/spinbox.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/library/spinbox.tcl b/library/spinbox.tcl
index 1430800..ce200a0 100644
--- a/library/spinbox.tcl
+++ b/library/spinbox.tcl
@@ -176,7 +176,7 @@ bind Spinbox <Delete> {
 	%W delete sel.first sel.last
     } else {
 	%W delete [tk::startOfCluster [%W get] [%W index insert]] \
-		[tk::endOfGlyphCluster [%W get] [%W index insert]]
+		[tk::endOfCluster [%W get] [%W index insert]]
     }
 }
 bind Spinbox <BackSpace> {
-- 
cgit v0.12