changeset 85900:273fc54f4338

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.
author Romain Francoise <romain@orebokech.com>
date Fri, 02 Nov 2007 11:03:43 +0000
parents 4cedf06c1ad2
children 990d0964a0cc
files lisp/ChangeLog lisp/files.el
diffstat 2 files changed, 8 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Fri Nov 02 08:21:04 2007 +0000
+++ b/lisp/ChangeLog	Fri Nov 02 11:03:43 2007 +0000
@@ -1,3 +1,9 @@
+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.
+
 2007-11-02  Glenn Morris  <rgm@gnu.org>
 
 	* newcomment.el (comment-indent): Let comment-insert-comment-function,
--- a/lisp/files.el	Fri Nov 02 08:21:04 2007 +0000
+++ b/lisp/files.el	Fri Nov 02 11:03:43 2007 +0000
@@ -2821,8 +2821,8 @@
 		;; 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.