Mercurial > emacs

diff lisp/emacs-lisp/byte-opt.el @ 91073:4bc33ffdda1a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge from emacs--devo--0 Patches applied: * emacs--devo--0 (patch 902-908) - Update from CVS - Merge from emacs--rel--22 * emacs--rel--22 (patch 131-137) - Update from CVS - Merge from gnus--rel--5.10 * gnus--rel--5.10 (patch 261-262) - Update from CVS Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-278
author Miles Bader <miles@gnu.org>
date Sat, 27 Oct 2007 09:12:07 +0000
parents d38543a1c0f9 dfdbd485bfa6
children 880960b70474
line wrap: on
line diff
--- a/lisp/emacs-lisp/byte-opt.el	Sat Oct 27 00:30:50 2007 +0000
+++ b/lisp/emacs-lisp/byte-opt.el	Sat Oct 27 09:12:07 2007 +0000
@@ -1148,7 +1148,7 @@
 (defun byte-optimize-featurep (form)
   ;; Emacs-21's byte-code doesn't run under XEmacs or SXEmacs anyway, so we
   ;; can safely optimize away this test.
-  (if (member (cdr-safe form) '((quote xemacs) (quote sxemacs)))
+  (if (member (cdr-safe form) '(((quote xemacs)) ((quote sxemacs))))
       nil
     form))