diff options
| author | Kenichi Handa <handa@m17n.org> | 2007-01-30 07:44:44 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 2007-01-30 07:44:44 +0000 |
| commit | f3df78db7218a084cbd58dc9a3cb5b9909b02d4d (patch) | |
| tree | f9f455664ba79d45aa17a7dcb6ada54d0f0563d0 /lisp/international/mule-diag.el | |
| parent | be2e9e1e77271f6c76315be717b66e00480374ea (diff) | |
| download | emacs-f3df78db7218a084cbd58dc9a3cb5b9909b02d4d.tar.gz | |
(list-character-sets-2): Don't print
width.
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) |