emacs/emacs-22.1-CVE-2007-5795.dif

14 lines
563 B
Plaintext

--- lisp/files.el
+++ lisp/files.el 2007-11-05 12:27:44.225166531 +0100
@@ -2736,8 +2736,8 @@ is specified, returning t if it is speci
;; 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.