diff options
Diffstat (limited to 'lisp/international/mule-diag.el')
| -rw-r--r-- | lisp/international/mule-diag.el | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/lisp/international/mule-diag.el b/lisp/international/mule-diag.el index 286a6410fdf..bffdc5b9a2a 100644 --- a/lisp/international/mule-diag.el +++ b/lisp/international/mule-diag.el @@ -184,21 +184,19 @@ SORT-KEY should be `name' or `iso-spec' (default `name')." ## CHARSET-SYMBOL-NAME, ## DIMENSION (1 or 2) ## CHARS (94 or 96) -## WIDTH (occupied column numbers: 1 or 2), -## DIRECTION (0:left-to-right, 1:right-to-left), ## ISO-FINAL-CHAR (character code of ISO-2022's final character) -## ISO-GRAPHIC-PLANE (ISO-2022's graphic plane, 0:GL, 1:GR) +## -1 means that no final character is assigned. ## DESCRIPTION (describing string of the charset) ") (let ((l charset-list) charset) (while l (setq charset (car l) l (cdr l)) - (princ (format "%s:%d:%d:%d:%d:%s\n" + (princ (format "%s:%d:%d:%d:%s\n" charset (charset-dimension charset) (charset-chars charset) - (aref char-width-table (make-char charset)) +;;; (char-width (make-char charset)) ;;; (charset-direction charset) (charset-iso-final-char charset) ;;; (charset-iso-graphic-plane charset) |