diff options
| -rw-r--r-- | src/print.c | 2 |
1 files changed, 2 insertions, 0 deletions
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); |