From f99fe74b6d9d2bdc38381e4f2b207631993c83b6 Mon Sep 17 00:00:00 2001
From: Darcy Shen <da@liii.pro>
Date: Sat, 12 Oct 2024 08:54:09 +0800
Subject: [PATCH] wip

---
 TeXmacs/langs/encoding/herktounicode.scm | 4 ++--
 TeXmacs/tests/66_13.scm                  | 4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/TeXmacs/langs/encoding/herktounicode.scm b/TeXmacs/langs/encoding/herktounicode.scm
index da5cffebb..bd0170c84 100644
--- a/TeXmacs/langs/encoding/herktounicode.scm
+++ b/TeXmacs/langs/encoding/herktounicode.scm
@@ -31,7 +31,7 @@
 ("#14"	"#BB")
 ("#15"	"#2013")
 ("#16"	"#2014")
-("#17"	"#2060")
+("#17"	"#200B")
 ("#18" "#2080")
 ("#19"	"#0131")
 ("#1A" "#0237")
@@ -135,7 +135,7 @@
 ("#7C"	"#7C")
 ("#7D"	"#7D")
 ("#7E"	"#7E")
-("#7F"	"#2010")
+("#7F"	"#00AD")
 ("#80"	"#0102")
 ("#81"	"#0104")
 ("#82"	"#0106")
diff --git a/TeXmacs/tests/66_13.scm b/TeXmacs/tests/66_13.scm
index f160599f7..31ff9f0e3 100644
--- a/TeXmacs/tests/66_13.scm
+++ b/TeXmacs/tests/66_13.scm
@@ -49,7 +49,7 @@
   (check (herk->utf8 (string #\x14)) => "»") ; U+00BB
   (check (herk->utf8 (string #\x15)) => "–") ; U+2013
   (check (herk->utf8 (string #\x16)) => "—") ; U+2014
-  (check (herk->utf8 (string #\x17)) => (utf8->string #u8(#xE2 #x81 #xA0))) ; U+2060
+  (check (herk->utf8 (string #\x17)) => (utf8->string #u8(#xE2 #x80 #x8B))) ; U+200B
   (check (herk->utf8 (string #\x18)) => "₀") ; U+2080
   (check (herk->utf8 (string #\x19)) => "ı") ; U+0131
   (check (herk->utf8 (string #\x1A)) => "ȷ") ; U+0237
@@ -190,7 +190,7 @@
   (check (herk->utf8 (string #\x7C)) => "|")
   (check (herk->utf8 (string #\x7D)) => "}")
   (check (herk->utf8 (string #\x7E)) => "~")
-  (check (herk->utf8 (string #\x7F)) => "‐") ; U+2010
+  (check (herk->utf8 (string #\x7F)) => (utf8->string #u8(#xC2 #xAD))) ; U+00AD
 )
 
 (define (test-herk-8x)