emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/helm 51182282fb 06/11: Use lexical option for eval


From: ELPA Syncer
Subject: [nongnu] elpa/helm 51182282fb 06/11: Use lexical option for eval
Date: Mon, 4 Jul 2022 02:58:44 -0400 (EDT)

branch: elpa/helm
commit 51182282fb620b5c3af496f7569ae28887e0de5d
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Use lexical option for eval
---
 helm-elisp.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/helm-elisp.el b/helm-elisp.el
index ff90128d2c..76f9731aa4 100644
--- a/helm-elisp.el
+++ b/helm-elisp.el
@@ -590,7 +590,7 @@ is only used to test DEFAULT."
     (cond ((custom-variable-p sym)
            (append
             actions
-            (let ((standard-value (eval (car (get sym 'standard-value)))))
+            (let ((standard-value (eval (car (get sym 'standard-value)) t)))
               (unless (equal standard-value (symbol-value sym))
                 `(("Reset Variable to default value"
                    . ,(lambda (candidate)
@@ -999,7 +999,7 @@ a string, i.e. the `symbol-name' of any existing symbol."
         ;; an interactive call, See `repeat-complex-command'.
         (add-hook 'called-interactively-p-functions
                   #'helm-complex-command-history--called-interactively-skip)
-        (eval (read helm-sexp--last-sexp)))
+        (eval (read helm-sexp--last-sexp) t))
     (remove-hook 'called-interactively-p-functions
                  #'helm-complex-command-history--called-interactively-skip)))
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]