diff options
| author | Michael Heerdegen <michael_heerdegen@web.de> | 2024-02-18 02:48:15 +0100 |
|---|---|---|
| committer | Michael Heerdegen <michael_heerdegen@web.de> | 2024-03-11 05:24:59 +0100 |
| commit | 9a2ce74c3783c4be8ba70642da374d8e77c6f9ac (patch) | |
| tree | 5b617f917b4d4bc57c454f7ac48228628ab9d021 /lisp/emacs-lisp | |
| parent | ed43ad5b5652aed075348357121d9193256721c0 (diff) | |
| download | emacs-9a2ce74c3783c4be8ba70642da374d8e77c6f9ac.tar.gz emacs-9a2ce74c3783c4be8ba70642da374d8e77c6f9ac.tar.bz2 emacs-9a2ce74c3783c4be8ba70642da374d8e77c6f9ac.zip | |
Fix pp-emacs-lisp-code printing of symbols
* lisp/emacs-lisp/pp.el (pp--insert-lisp): Print symbols
readably (bug#69168).
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/pp.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/pp.el b/lisp/emacs-lisp/pp.el index 1d722051406..944dd750839 100644 --- a/lisp/emacs-lisp/pp.el +++ b/lisp/emacs-lisp/pp.el @@ -458,6 +458,8 @@ the bounds of a region containing Lisp code to pretty-print." (string (let ((print-escape-newlines t)) (prin1 sexp (current-buffer)))) + (symbol + (prin1 sexp (current-buffer))) (otherwise (princ sexp (current-buffer))))) (defun pp--format-vector (sexp) |