diff options
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/pp.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/pp.el b/lisp/emacs-lisp/pp.el index d578e685ca9..3176ee42533 100644 --- a/lisp/emacs-lisp/pp.el +++ b/lisp/emacs-lisp/pp.el @@ -577,7 +577,8 @@ the bounds of a region containing Lisp code to pretty-print." (unless (consp edebug) (setq edebug nil)) (if (and (consp (car edebug)) - (eq (caar edebug) '&rest)) + (eq (caar edebug) '&rest) + (proper-list-p (car sexp))) (pp--insert-binding (pop sexp)) (if (null (car sexp)) (insert "()") |