mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-10 08:10:21 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/emacs-lisp/lisp.el (lisp--local-variables-1): Handle `quote'.

Browse source 
Backported.

Fixes: debbugs:18688
This commit is contained in:
Stefan Monnier 2014-10-14 22:00:20 -04:00
parent e01955dfb3
commit 6d81466ac6
2 changed files with 8 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

1
lisp/emacs-lisp/lisp.el
View file

@ -711,6 +711,7 @@ considered."
(`(condition-case ,v ,_ . ,catches)
(lisp--local-variables-1
(cons v vars) (cdr (car (last catches)))))
(`(quote . ,_) (setq sexp nil))
(`(,_ . ,_)
(lisp--local-variables-1 vars (car (last sexp))))
(`lisp--witness--lisp (or vars '(nil)))