[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/dape d3080178ba 1/2: Ensure that zap form values are ev
From: |
ELPA Syncer |
Subject: |
[elpa] externals/dape d3080178ba 1/2: Ensure that zap form values are evaluated |
Date: |
Thu, 14 Nov 2024 12:57:59 -0500 (EST) |
branch: externals/dape
commit d3080178bac37cfc54803c243fce56bfdfa4e7cc
Author: Daniel Pettersson <daniel@dpettersson.net>
Commit: Daniel Pettersson <daniel@dpettersson.net>
Ensure that zap form values are evaluated
---
dape.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/dape.el b/dape.el
index 510c7209b0..43550ea8e4 100644
--- a/dape.el
+++ b/dape.el
@@ -5083,7 +5083,9 @@ Where ALIST-KEY exists in `dape-configs'."
(pcase-let* ((config-diff (dape--config-diff key post-eval-config))
((map :env :program :args) config-diff)
(zap-form-p (and dape-config-dash-form-p
- (or program (and env (not args))))))
+ (or (stringp program)
+ (and (consp env) (keywordp (car env))
+ (not args))))))
(when zap-form-p
(cl-loop for key in '(:program :env :args) do
(setq config-diff (map-delete config-diff key))))