branch: elpa/helm
commit 51182282fb620b5c3af496f7569ae28887e0de5d
Author: Stefan Monnier <[email protected]>
Commit: Thierry Volpiatto <[email protected]>

    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