From: Dave Love <fx@gnu.org>
Date: Thu, 24 Aug 2000 09:48:48 +0000 (+0000)
Subject: Make pilcrow convenient string
X-Git-Tag: emacs-pretest-21.0.90~2000
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=10a6a1b694528987cf759b49a75d8a0d3eb1d180;p=emacs.git

Make pilcrow convenient string
consistent with section.
(iso-ascii-display): Set up multibyte characters as well as
unibyte.
---

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 @@
   (if iso-ascii-convenient
       (setq string (or convenient-string string))
     (setq string (concat "{" string "}")))
-  (standard-display-ascii code string))
+  ;; unibyte
+  (standard-display-ascii code string)
+  ;; multibyte
+  (standard-display-ascii (make-char 'latin-iso8859-1 (- code 128))
+			  string))
 
 (iso-ascii-display 160 "_" " ")   ; NBSP (no-break space)
 (iso-ascii-display 161 "!")   ; inverted exclamation mark
@@ -73,7 +77,7 @@
 (iso-ascii-display 179 "3")   ; superscript three
 (iso-ascii-display 180 "'")   ; acute accent
 (iso-ascii-display 181 "u")   ; micro sign
-(iso-ascii-display 182 "P" "{P}")   ; pilcrow
+(iso-ascii-display 182 "P" "(P)")   ; pilcrow
 (iso-ascii-display 183 ".")   ; middle dot
 (iso-ascii-display 184 ",")   ; cedilla
 (iso-ascii-display 185 "1")   ; superscript one