aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/emacs-lisp/edebug.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el
index b988a8ac79d..e825f2434b4 100644
--- a/lisp/emacs-lisp/edebug.el
+++ b/lisp/emacs-lisp/edebug.el
@@ -1496,7 +1496,7 @@ expressions; a `progn' form will be returned enclosing these forms."
1496 (cond 1496 (cond
1497 ((symbolp head) 1497 ((symbolp head)
1498 (cond 1498 (cond
1499 ((null head) nil) ; () is legal. 1499 ((null head) nil) ; () is valid.
1500 ((eq head 'interactive-p) 1500 ((eq head 'interactive-p)
1501 ;; Special case: replace (interactive-p) with variable 1501 ;; Special case: replace (interactive-p) with variable
1502 (setq edebug-def-interactive 'check-it) 1502 (setq edebug-def-interactive 'check-it)
@@ -2076,7 +2076,7 @@ expressions; a `progn' form will be returned enclosing these forms."
2076 ;; doesn't handle (a . ,b). The straightforward fix: 2076 ;; doesn't handle (a . ,b). The straightforward fix:
2077 ;; (backquote-form . [&or nil backquote-form]) 2077 ;; (backquote-form . [&or nil backquote-form])
2078 ;; uses up too much stack space. 2078 ;; uses up too much stack space.
2079 ;; Note that `(foo . ,@bar) is not legal, so we don't need to handle it. 2079 ;; Note that `(foo . ,@bar) is not valid, so we don't need to handle it.
2080 (backquote-form [&rest [&not ","] backquote-form] 2080 (backquote-form [&rest [&not ","] backquote-form]
2081 . [&or nil backquote-form]) 2081 . [&or nil backquote-form])
2082 ;; If you use dotted forms in backquotes, replace the previous line 2082 ;; If you use dotted forms in backquotes, replace the previous line