* lisp/language/japanese.el (map): Fix typo (bug#69494).

(cherry picked from commit e581c111165c4d138b72b6493717ed22fcb68a8e)

diff --git a/lisp/language/japanese.el b/lisp/language/japanese.el
index dd65409c839bde7276c31c194a9cef49c974f3d0..8957d1a49aff97d578a9a45c1421952d94252366 100644 (file)
--- a/lisp/language/japanese.el
+++ b/lisp/language/japanese.el
@@ -79,7 +79,7 @@
         (#x00A2 . #xFFE0)      ; CENT SIGN             FULLWIDTH CENT SIGN
         (#x00A3 . #xFFE1)      ; POUND SIGN            FULLWIDTH POUND SIGN
         (#x00AC . #xFFE2)      ; NOT SIGN              FULLWIDTH NOT SIGN
-        (#x00A6 . #xFFE4)      ; BROKEN LINE           FULLWIDTH BROKEN LINE
+        (#x00A6 . #xFFE4)      ; BROKEN BAR            FULLWIDTH BROKEN BAR
         )))
   (define-translation-table 'japanese-ucs-jis-to-cp932-map map)
   (setq map (mapcar (lambda (x) (cons (cdr x) (car x))) map))