[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/byte-opt.el, v [EMACS_22_BASE]

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Branch:         EMACS_22_BASE
Changes by:     Stefan Monnier <monnier>        07/08/23 15:11:31

Index: emacs-lisp/byte-opt.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/emacs-lisp/byte-opt.el,v
retrieving revision 1.94.2.2
retrieving revision 1.94.2.3
diff -u -b -r1.94.2.2 -r1.94.2.3
--- emacs-lisp/byte-opt.el      8 Aug 2007 07:15:45 -0000       1.94.2.2
+++ emacs-lisp/byte-opt.el      23 Aug 2007 15:11:31 -0000      1.94.2.3
@@ -1135,9 +1135,9 @@
 
 (put 'featurep 'byte-optimizer 'byte-optimize-featurep)
 (defun byte-optimize-featurep (form)
-  ;; Emacs-21's byte-code doesn't run under XEmacs anyway, so we can
-  ;; safely optimize away this test.
-  (if (equal '((quote xemacs)) (cdr-safe 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)))
       nil
     form))