diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/international/mule-diag.el | 4 |
2 files changed, 5 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 49124734b1f..9eca8065d8f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2000-05-26 Kenichi Handa <handa@etl.go.jp> + * international/mule-diag.el (print-fontset): Combine family part + and registry part of the fontname by "-*-" instead of "-". + * international/mule-cmds.el (encode-coding-char): Make strings multibyte before calling encode-coding-string. diff --git a/lisp/international/mule-diag.el b/lisp/international/mule-diag.el index bfe64a7ffda..39f50e1b487 100644 --- a/lisp/international/mule-diag.el +++ b/lisp/international/mule-diag.el @@ -1079,8 +1079,8 @@ but still contains full information about each coding system." (insert font-spec) (if (car font-spec) (if (string-match "-" (car font-spec)) - (insert "-" (car font-spec) "-") - (insert "-*-" (car font-spec) "-")) + (insert "-" (car font-spec) "-*-") + (insert "-*-" (car font-spec) "-*-")) (insert "-*-")) (if (cdr font-spec) (if (string-match "-" (cdr font-spec)) |