[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master d69b5a9: Fix pp-emacs-lisp-code for `when' and related
From: |
Lars Ingebrigtsen |
Subject: |
master d69b5a9: Fix pp-emacs-lisp-code for `when' and related |
Date: |
Sat, 6 Nov 2021 21:45:00 -0400 (EDT) |
branch: master
commit d69b5a9caaf7697eb70b9eb5e63fae8b94ccd798
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Fix pp-emacs-lisp-code for `when' and related
* lisp/emacs-lisp/pp.el (pp--format-definition): Skip edebug specs
we don't understand at all.
---
lisp/emacs-lisp/pp.el | 3 +++
1 file changed, 3 insertions(+)
diff --git a/lisp/emacs-lisp/pp.el b/lisp/emacs-lisp/pp.el
index 3f5e1a4..8464b5a 100644
--- a/lisp/emacs-lisp/pp.el
+++ b/lisp/emacs-lisp/pp.el
@@ -310,6 +310,9 @@ Use the `pp-max-width' variable to control the desired line
length."
(while (and (cl-plusp indent)
sexp)
(insert " ")
+ ;; We don't understand all the edebug specs.
+ (unless (consp edebug)
+ (setq edebug nil))
(if (and (consp (car edebug))
(eq (caar edebug) '&rest))
(pp--insert-binding (pop sexp))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master d69b5a9: Fix pp-emacs-lisp-code for `when' and related,
Lars Ingebrigtsen <=