[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/setup c9bc47a 16/19: Simplify edebug specification gene
From: |
Stefan Monnier |
Subject: |
[elpa] externals/setup c9bc47a 16/19: Simplify edebug specification generation |
Date: |
Mon, 15 Mar 2021 17:26:28 -0400 (EDT) |
branch: externals/setup
commit c9bc47ae7787b83ae98cec7766112b6977fccdb7
Author: Philip K <philipk@posteo.net>
Commit: Philip K <philipk@posteo.net>
Simplify edebug specification generation
---
setup.el | 17 ++++++++---------
1 file changed, 8 insertions(+), 9 deletions(-)
diff --git a/setup.el b/setup.el
index 596a00c..e7bd07c 100644
--- a/setup.el
+++ b/setup.el
@@ -190,15 +190,14 @@ If not given, it is assumed nothing is evaluated."
(delq (assoc (symbol-name name)
setup-edebug-specifications)
setup-edebug-specifications))
- (let ((body (or (plist-get opts :debug) '(sexp))))
- ;; FIXME: Use `&interpose' in Emacs≥28.
- (push `(,(symbol-name name)
- ,@(and (plist-get opts :repeatable)
- '(&rest))
- ,@(and (get name 'setup-signature)
- (or (plist-get opts :debug)
- '(sexp))))
- setup-edebug-specifications))
+ ;; FIXME: Use `&interpose' in Emacs≥28.
+ (push `(,(symbol-name name)
+ ,@(and (or (plist-get opts :repeatable)
+ (null (plist-get opts :debug)))
+ '(&rest))
+ ,@(or (plist-get opts :debug)
+ '(sexp)))
+ setup-edebug-specifications)
(put 'setup 'edebug-form-spec
(append '(&rest &or [symbolp sexp])
setup-edebug-specifications
- [elpa] externals/setup updated (6d84649 -> 39accbf), Stefan Monnier, 2021/03/15
- [elpa] externals/setup aa9bad8 05/19: Drop unused setup-indent property, Stefan Monnier, 2021/03/15
- [elpa] externals/setup 44d2cfd 09/19: Ignore package.el files, Stefan Monnier, 2021/03/15
- [elpa] externals/setup d2e31e7 01/19: Replaced CC0 LICENSE with GPL, Stefan Monnier, 2021/03/15
- [elpa] externals/setup bb11fa8 06/19: Avoid reconstructing entire edebug specification, Stefan Monnier, 2021/03/15
- [elpa] externals/setup 0e4995f 15/19: Use fenced code block for example, Stefan Monnier, 2021/03/15
- [elpa] externals/setup 7fddc97 17/19: Explain usage of keywords for local macros, Stefan Monnier, 2021/03/15
- [elpa] externals/setup 8ca0d20 18/19: Bump version to 0.1.1, Stefan Monnier, 2021/03/15
- [elpa] externals/setup c9bc47a 16/19: Simplify edebug specification generation,
Stefan Monnier <=
- [elpa] externals/setup 39accbf 19/19: Mention GitHub mirror, Stefan Monnier, 2021/03/15
- [elpa] externals/setup 578f7bb 04/19: Update setup-define docstring, Stefan Monnier, 2021/03/15
- [elpa] externals/setup 894819d 10/19: Drop "none" as argument for :debug, Stefan Monnier, 2021/03/15
- [elpa] externals/setup d9a5850 02/19: Manually specify macro arity via :repeatable, Stefan Monnier, 2021/03/15
- [elpa] externals/setup 1bfca33 03/19: Avoid manual signature specification via help-function-arglist, Stefan Monnier, 2021/03/15
- [elpa] externals/setup fc958ad 08/19: Rename :needs argument to executable, Stefan Monnier, 2021/03/15
- [elpa] externals/setup 295e173 12/19: Update README, Stefan Monnier, 2021/03/15
- [elpa] externals/setup 9bd5f5b 14/19: Fix markdown code syntax, Stefan Monnier, 2021/03/15
- [elpa] externals/setup e8a5ac7 07/19: Rename :hook argument to function, Stefan Monnier, 2021/03/15
- [elpa] externals/setup 5e24fe1 11/19: Decrease required Emacs version to 24.4, Stefan Monnier, 2021/03/15