summaryrefslogtreecommitdiff
path: root/lisp/subr.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/subr.el')
-rw-r--r--lisp/subr.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/subr.el b/lisp/subr.el
index c79a69b221e..99f632fb586 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -427,11 +427,11 @@ Non-strings in LIST are ignored."
(setq list (cdr list)))
list)
-(defmacro with-lexical-binding (&rest body)
- "Execute the statements in BODY using lexical binding."
- `(let ((internal-interpreter-environment internal-interpreter-environment))
- (setq internal-interpreter-environment '(t))
- ,@body))
+;; Remove this since we don't know how to handle it in the byte-compiler yet.
+;; (defmacro with-lexical-binding (&rest body)
+;; "Execute the statements in BODY using lexical binding."
+;; `(let ((internal-interpreter-environment '(t)))
+;; ,@body))
(defun assq-delete-all (key alist)
"Delete from ALIST all elements whose car is `eq' to KEY.