aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii2025-03-15 13:58:44 +0200
committerEli Zaretskii2025-03-15 13:58:44 +0200
commitea49eb4752a0632d8d0dfd4215821ab21bbd5a99 (patch)
tree21b7bb15a8e32debbe5b3fb4221d91512827e344
parent52e49a5616011173a6bd52e8501cd720e262d3af (diff)
downloademacs-ea49eb4752a0632d8d0dfd4215821ab21bbd5a99.tar.gz
emacs-ea49eb4752a0632d8d0dfd4215821ab21bbd5a99.zip
Improve conversion between half-width and full-width characters
* lisp/textmodes/text-mode.el (text-mode--get-fullwidth-table): Add conversion of SPC to IDEOGRAPHIC SPACE. (Bug#71822)
-rw-r--r--lisp/textmodes/text-mode.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/textmodes/text-mode.el b/lisp/textmodes/text-mode.el
index 3b27efbcf87..2d9bb9fb784 100644
--- a/lisp/textmodes/text-mode.el
+++ b/lisp/textmodes/text-mode.el
@@ -286,6 +286,9 @@ The argument NLINES says how many lines to center."
286 (aset tbl ch (+ ch #xFEE0)) 286 (aset tbl ch (+ ch #xFEE0))
287 (aset rev-tbl (+ ch #xFEE0) ch) 287 (aset rev-tbl (+ ch #xFEE0) ch)
288 (setq ch (1+ ch))) 288 (setq ch (1+ ch)))
289 ;; SPC -> U+3000 IDEOGRAPHIC SPACE
290 (aset tbl ?\ #x3000)
291 (aset rev-tbl #x3000 ?\ )
289 (set-char-table-extra-slot tbl 0 rev-tbl) 292 (set-char-table-extra-slot tbl 0 rev-tbl)
290 (set-char-table-extra-slot tbl 1 1) 293 (set-char-table-extra-slot tbl 1 1)
291 (set-char-table-extra-slot rev-tbl 1 1) 294 (set-char-table-extra-slot rev-tbl 1 1)