Mercurial > emacs

changeset 42460:21eaf0f81c5d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(print_object): Test print_escape_nonascii only for unibyte strings. (PRINTPREPARE): Once again bind Qprint_escape_nonascii when outputting to a multibyte buffer.
author Richard M. Stallman <rms@gnu.org>
date Tue, 01 Jan 2002 07:12:59 +0000
parents 0d252eaf4fee
children c28b5df30ea0
files src/print.c
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/print.c	Tue Jan 01 01:25:11 2002 +0000
+++ b/src/print.c	Tue Jan 01 07:12:59 2002 +0000
@@ -226,6 +226,9 @@
        if (NILP (current_buffer->enable_multibyte_characters)		\
 	   && ! print_escape_multibyte)					\
          specbind (Qprint_escape_multibyte, Qt);			\
+       if (! NILP (current_buffer->enable_multibyte_characters)		\
+	   && ! print_escape_nonascii)					\
+         specbind (Qprint_escape_nonascii, Qt);				\
        if (print_buffer != 0)						\
 	 {								\
 	   string = make_string_from_bytes (print_buffer,		\
@@ -1427,7 +1430,7 @@
 		  PRINTCHAR ('f');
 		}
 	      else if (multibyte && ! ASCII_BYTE_P (c)
-		       && (print_escape_multibyte || print_escape_nonascii))
+		       && print_escape_multibyte)
 		{
 		  /* When multibyte is disabled,
 		     print multibyte string chars using hex escapes.  */