summaryrefslogtreecommitdiff
path: root/lisp/files.el
diff options
context:
space:
mode:
authorRomain Francoise <romain@orebokech.com>2007-11-02 11:02:13 +0000
committerRomain Francoise <romain@orebokech.com>2007-11-02 11:02:13 +0000
commitd7a2fd422e9aa62460fe9479203f7c212af36bc6 (patch)
treefaf6512be801eb1b12b7fcd44ecad4941f7d9152 /lisp/files.el
parent6da047e7418803afa986aa01f34abda32cfd40cc (diff)
downloademacs-d7a2fd422e9aa62460fe9479203f7c212af36bc6.tar.gz
2007-11-02 Drake Wilson <drake@begriffli.ch> (tiny change)
* files.el (hack-local-variables): Fix membership tests to avoid treating all variables as safe if `enable-local-variables' is set to :safe.
Diffstat (limited to 'lisp/files.el')
-rw-r--r--lisp/files.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/files.el b/lisp/files.el
index 9ae4396946b..169912b94bc 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -2764,8 +2764,8 @@ is specified, returning t if it is specified."
;; If caller wants only the safe variables,
;; install only them.
(dolist (elt result)
- (unless (or (memq (car elt) unsafe-vars)
- (memq (car elt) risky-vars))
+ (unless (or (member elt unsafe-vars)
+ (member elt risky-vars))
(hack-one-local-variable (car elt) (cdr elt))))
;; Query, except in the case where all are known safe
;; if the user wants no quuery in that case.