# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 967110528 0
# Node ID 1ff8dc8dbffc5b08fa2aebfc171e6441948910e9
# Parent  7d0a8b91a6c0c261f08644976b45fc28d5830ea0
Make pilcrow convenient string
consistent with section.
(iso-ascii-display): Set up multibyte characters as well as
unibyte.

diff -r 7d0a8b91a6c0 -r 1ff8dc8dbffc lisp/international/iso-ascii.el
--- a/lisp/international/iso-ascii.el	Thu Aug 24 08:03:06 2000 +0000
+++ b/lisp/international/iso-ascii.el	Thu Aug 24 09:48:48 2000 +0000
@@ -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