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.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 00448b647152243e884c3f690569514cd2b335d9..dd5ab69e37cf0e0bde13d1fd7f1262d1a56cbdc4 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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>
 
        * progmodes/etags.el (tags-table-mode): Disable undo.

diff --git a/lisp/files.el b/lisp/files.el
index 9ae4396946b02f588fa88c3ed7c4da9b30ed07c0..169912b94bc1d79daf6199a4209e3387cdfcdf59 100644 (file)
--- 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.