summaryrefslogtreecommitdiff
path: root/lisp/term
diff options
context:
space:
mode:
authorPaul Eggert <eggert@cs.ucla.edu>2013-03-18 12:44:15 -0700
committerPaul Eggert <eggert@cs.ucla.edu>2013-03-18 12:44:15 -0700
commit2aa2157b567231863783b32707c83d5a0f681ca0 (patch)
tree55f1c9d08b07831a056d8802df02bf0c32983a40 /lisp/term
parent2b9c0f44e4567218687868f81c0fb90769002079 (diff)
downloademacs-2aa2157b567231863783b32707c83d5a0f681ca0.tar.gz
iso-2022-7bit commentary fixes
* notes/unicode: Mention some more iso-2022-7bit files. * lisp/term/x-win.el (x-keysym-pair): Add a Fixme. Fixes: debbugs:13936
Diffstat (limited to 'lisp/term')
-rw-r--r--lisp/term/x-win.el7
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index 63ef2b402b0..84d6ddbf46c 100644
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -427,7 +427,9 @@ as returned by `x-server-vendor'."
(#x3fe . ?,D~(B)
;; Kana: Fixme: needs conversion to Japanese charset -- seems
;; to require jisx0213, for which the Unicode translation
- ;; isn't clear.
+ ;; isn't clear. Using Emacs to convert this to Unicode and back changes
+ ;; this from "(J~(B" (i.e., bytes "ESC ( J ~ ESC ( B") to "$(G"#(B" (i.e., bytes
+ ;; "ESC $ ( G " # ESC ( B").
(#x47e . ?(J~(B)
(#x4a1 . ?$A!#(B)
(#x4a2 . ?\$A!8(B)
@@ -1127,6 +1129,9 @@ as returned by `x-server-vendor'."
(#x20a8 . ?$,1tH(B)
(#x20aa . ?$,1tJ(B)
(#x20ab . ?$,1tK(B)
+ ;; Kana: Fixme: needs checking. Using Emacs to convert this to Unicode
+ ;; and back changes this from ",b$(B" (i.e., bytes "ESC , b $ ESC ( B") to
+ ;; ",F$(B" (i.e., bytes "ESC , F $ ESC ( B").
(#x20ac . ?,b$(B)))
(puthash (car pair) (cdr pair) x-keysym-table))