procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/emacs-lisp/assoc.el (aget): Fix dynamic-scoping issue.

Browse source 
Fixes: debbugs:11352
This commit is contained in:
Stefan Monnier 2012-04-26 14:21:03 -04:00
parent e95a67dc75
commit 657c21e46b
2 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
lisp/ChangeLog
View file

@ -1,5 +1,6 @@
2012-04-26 Stefan Monnier <monnier@iro.umontreal.ca>
* emacs-lisp/assoc.el (aget): Fix dynamic-scoping issue (bug#11352).
* term/ns-win.el (ns-define-service):
* progmodes/pascal.el (pascal-goto-defun):

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

@ -101,6 +101,7 @@ returned.
If no key-value pair matching KEY could be found in ALIST, or ALIST is
nil then nil is returned. ALIST is not altered."
(defvar copy)
(let ((copy (copy-alist alist)))
(cond ((null alist) nil)
((progn (asort 'copy key)