diff options
| author | Po Lu | 2022-07-28 21:04:06 +0800 |
|---|---|---|
| committer | Po Lu | 2022-07-28 21:04:06 +0800 |
| commit | d17a867d7085a1f68ff01f9fb01f2a1b4d1e8484 (patch) | |
| tree | 77d534ef7879b0d0cfaea2cd4fe8c62b414c3471 /src | |
| parent | 1ec70ef3df49b473f6f8fe261d5b531db3fabc9d (diff) | |
| download | emacs-d17a867d7085a1f68ff01f9fb01f2a1b4d1e8484.tar.gz emacs-d17a867d7085a1f68ff01f9fb01f2a1b4d1e8484.zip | |
; * src/print.c (print_vectorlike): Fix Lisp_Object type mixup.
Diffstat (limited to 'src')
| -rw-r--r-- | src/print.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/print.c b/src/print.c index 7bb905b2699..7303e847aa2 100644 --- a/src/print.c +++ b/src/print.c | |||
| @@ -1662,7 +1662,7 @@ print_vectorlike (Lisp_Object obj, Lisp_Object printcharfun, bool escapeflag, | |||
| 1662 | problems if, for instance, the callback function switches a | 1662 | problems if, for instance, the callback function switches a |
| 1663 | window to this buffer -- this will make Emacs segfault. */ | 1663 | window to this buffer -- this will make Emacs segfault. */ |
| 1664 | if (!NILP (Vprint__unreadable_callback_buffer) | 1664 | if (!NILP (Vprint__unreadable_callback_buffer) |
| 1665 | && Fbuffer_live_p (Vprint__unreadable_callback_buffer)) | 1665 | && !NILP (Fbuffer_live_p (Vprint__unreadable_callback_buffer))) |
| 1666 | { | 1666 | { |
| 1667 | record_unwind_current_buffer (); | 1667 | record_unwind_current_buffer (); |
| 1668 | set_buffer_internal (XBUFFER (Vprint__unreadable_callback_buffer)); | 1668 | set_buffer_internal (XBUFFER (Vprint__unreadable_callback_buffer)); |