diff options
| author | Richard M. Stallman | 1998-03-21 17:51:30 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-03-21 17:51:30 +0000 |
| commit | 9dffd511461123b4d11dbb58d24da65ca7493105 (patch) | |
| tree | a53490400cf3c4363696d2689e140a221c1e5842 /src/print.c | |
| parent | e6e5ac68000ebad8b16313910958384d925648f7 (diff) | |
| download | emacs-9dffd511461123b4d11dbb58d24da65ca7493105.tar.gz emacs-9dffd511461123b4d11dbb58d24da65ca7493105.zip | |
(PRINTPREPARE): Use make_string_from_bytes.
Diffstat (limited to 'src/print.c')
| -rw-r--r-- | src/print.c | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/src/print.c b/src/print.c index 264659288c5..60fc95b234d 100644 --- a/src/print.c +++ b/src/print.c | |||
| @@ -1,5 +1,6 @@ | |||
| 1 | /* Lisp object printing and output streams. | 1 | /* Lisp object printing and output streams. |
| 2 | Copyright (C) 1985, 86, 88, 93, 94, 95, 97, 98 Free Software Foundation, Inc. | 2 | Copyright (C) 1985, 86, 88, 93, 94, 95, 97, 1998 |
| 3 | Free Software Foundation, Inc. | ||
| 3 | 4 | ||
| 4 | This file is part of GNU Emacs. | 5 | This file is part of GNU Emacs. |
| 5 | 6 | ||
| @@ -257,9 +258,9 @@ glyph_to_str_cpy (glyphs, str) | |||
| 257 | Lisp_Object string; \ | 258 | Lisp_Object string; \ |
| 258 | if (print_buffer != 0) \ | 259 | if (print_buffer != 0) \ |
| 259 | { \ | 260 | { \ |
| 260 | string = make_multibyte_string (print_buffer, \ | 261 | string = make_string_from_bytes (print_buffer, \ |
| 261 | print_buffer_pos, \ | 262 | print_buffer_pos, \ |
| 262 | print_buffer_pos_byte); \ | 263 | print_buffer_pos_byte); \ |
| 263 | record_unwind_protect (print_unwind, string); \ | 264 | record_unwind_protect (print_unwind, string); \ |
| 264 | } \ | 265 | } \ |
| 265 | else \ | 266 | else \ |