summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/byte-opt.el
diff options
context:
space:
mode:
authorMiles Bader <miles@gnu.org>2007-08-27 04:00:19 +0000
committerMiles Bader <miles@gnu.org>2007-08-27 04:00:19 +0000
commit596a489eda3ea091dc6f9d9d5ad10daacf2b7923 (patch)
tree16f65d4b4ee461bfd541affcff9ff7d0faf20cb0 /lisp/emacs-lisp/byte-opt.el
parent21320d2f85b5f73e8b8e998cb6f39dd024403628 (diff)
parent258c520b708ada337d36f55e36eedb9fd01a8744 (diff)
downloademacs-596a489eda3ea091dc6f9d9d5ad10daacf2b7923.tar.gz
Merge from emacs--rel--22
Patches applied: * emacs--rel--22 (patch 97-100) - Update from CVS - Merge from gnus--rel--5.10 * gnus--rel--5.10 (patch 246-247) - Update from CVS Revision: emacs@sv.gnu.org/emacs--devo--0--patch-860
Diffstat (limited to 'lisp/emacs-lisp/byte-opt.el')
-rw-r--r--lisp/emacs-lisp/byte-opt.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index 80a6ad595b2..fdeab460c79 100644
--- a/lisp/emacs-lisp/byte-opt.el
+++ b/lisp/emacs-lisp/byte-opt.el
@@ -1146,9 +1146,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))