diff options
| -rw-r--r-- | lisp/international/iso-ascii.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/international/iso-ascii.el b/lisp/international/iso-ascii.el index c3e6781fdfb..14550a05c81 100644 --- a/lisp/international/iso-ascii.el +++ b/lisp/international/iso-ascii.el | |||
| @@ -49,7 +49,11 @@ | |||
| 49 | (if iso-ascii-convenient | 49 | (if iso-ascii-convenient |
| 50 | (setq string (or convenient-string string)) | 50 | (setq string (or convenient-string string)) |
| 51 | (setq string (concat "{" string "}"))) | 51 | (setq string (concat "{" string "}"))) |
| 52 | (standard-display-ascii code string)) | 52 | ;; unibyte |
| 53 | (standard-display-ascii code string) | ||
| 54 | ;; multibyte | ||
| 55 | (standard-display-ascii (make-char 'latin-iso8859-1 (- code 128)) | ||
| 56 | string)) | ||
| 53 | 57 | ||
| 54 | (iso-ascii-display 160 "_" " ") ; NBSP (no-break space) | 58 | (iso-ascii-display 160 "_" " ") ; NBSP (no-break space) |
| 55 | (iso-ascii-display 161 "!") ; inverted exclamation mark | 59 | (iso-ascii-display 161 "!") ; inverted exclamation mark |
| @@ -73,7 +77,7 @@ | |||
| 73 | (iso-ascii-display 179 "3") ; superscript three | 77 | (iso-ascii-display 179 "3") ; superscript three |
| 74 | (iso-ascii-display 180 "'") ; acute accent | 78 | (iso-ascii-display 180 "'") ; acute accent |
| 75 | (iso-ascii-display 181 "u") ; micro sign | 79 | (iso-ascii-display 181 "u") ; micro sign |
| 76 | (iso-ascii-display 182 "P" "{P}") ; pilcrow | 80 | (iso-ascii-display 182 "P" "(P)") ; pilcrow |
| 77 | (iso-ascii-display 183 ".") ; middle dot | 81 | (iso-ascii-display 183 ".") ; middle dot |
| 78 | (iso-ascii-display 184 ",") ; cedilla | 82 | (iso-ascii-display 184 ",") ; cedilla |
| 79 | (iso-ascii-display 185 "1") ; superscript one | 83 | (iso-ascii-display 185 "1") ; superscript one |