Mercurial > emacs
diff src/print.c @ 50080:5ff2f3145fd1
(Fprin1_to_string): Return unibyte string if possible.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Tue, 11 Mar 2003 15:52:37 +0000 |
| parents | 23a1cea22d13 |
| children | 997593980303 |
line wrap: on
line diff
--- a/src/print.c Tue Mar 11 12:49:20 2003 +0000 +++ b/src/print.c Tue Mar 11 15:52:37 2003 +0000 @@ -775,6 +775,8 @@ 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);
