diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/subr.el | 10 |
2 files changed, 9 insertions, 5 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 65d422a80ea..5a5b7ef44dc 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2010-12-13 Stefan Monnier <monnier@iro.umontreal.ca> + + * subr.el (with-lexical-binding): Remove. + 2010-06-18 Stefan Monnier <monnier@iro.umontreal.ca> * emacs-lisp/byte-lexbind.el (byte-compile-compute-lforminfo): 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. |