branch: externals/objed
commit 5761dcfa64ae15d9694b0cd559e3c9212337fc5b
Author: Clemens Radermacher <clem...@posteo.net>
Commit: Clemens Radermacher <clem...@posteo.net>
Obey lexical binding for eval op
---
objed.el | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/objed.el b/objed.el
index eaa718b..8b5ccc0 100644
--- a/objed.el
+++ b/objed.el
@@ -2748,8 +2748,7 @@ If REPLACE is non-nil replace the region with the result."
(cond ((and (memq (car e-sexp) (list 'defvar 'defcustom
'defvar-local))
(consp (cdr e-sexp))
(boundp (cadr e-sexp)))
- ;; FIXME: Obey lexical-binding.
- (set (cadr e-sexp) (eval (car (cddr e-sexp)))))
+ (set (cadr e-sexp) (eval (car (cddr e-sexp))
lexical-binding)))
((eq (car e-sexp) 'defface)
(elisp--eval-defun-1 (macroexpand e-sexp)))
((memq (car e-sexp) '(\, \,@))
