diff options
| author | Dave Love | 2000-08-24 09:48:48 +0000 |
|---|---|---|
| committer | Dave Love | 2000-08-24 09:48:48 +0000 |
| commit | 10a6a1b694528987cf759b49a75d8a0d3eb1d180 (patch) | |
| tree | b1fbd785c67dd7773a611cbc1ee9e1baa01c8c3d | |
| parent | 56bfaffd7276218a001f9481f809dc1d44b8910d (diff) | |
| download | emacs-10a6a1b694528987cf759b49a75d8a0d3eb1d180.tar.gz emacs-10a6a1b694528987cf759b49a75d8a0d3eb1d180.zip | |
Make pilcrow convenient string
consistent with section.
(iso-ascii-display): Set up multibyte characters as well as
unibyte.
| -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 |