Mercurial > emacs
changeset 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 | d9f4e02aba7e |
| children | 9431fa452e95 |
| files | src/print.c |
| diffstat | 1 files changed, 2 insertions(+), 0 deletions(-) [+] |
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);