Commit 657c21e4 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

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

Fixes: debbugs:11352
parent e95a67dc
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):
......
......@@ -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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment