From b51ee1312d32e5d7644e9af44ac8f2add5b45c95 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 11 Mar 2003 15:52:37 +0000 Subject: [PATCH] (Fprin1_to_string): Return unibyte string if possible. --- src/print.c | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/print.c b/src/print.c index 151a193076d..38e82488b3c 100644 --- a/src/print.c +++ b/src/print.c @@ -775,6 +775,8 @@ A printed representation of an object is text which describes that object. */) PRINTFINISH; set_buffer_internal (XBUFFER (Vprin1_to_string_buffer)); object = Fbuffer_string (); + if (SBYTES (object) == SCHARS (object)) + STRING_SET_UNIBYTE (object); Ferase_buffer (); set_buffer_internal (old); -- 2.39.2