changeset 85513:dfdbd485bfa6

(byte-optimize-featurep): Fix paren typo.

--- a/lisp/ChangeLog	Sun Oct 21 19:35:11 2007 +0000
+++ b/lisp/ChangeLog	Sun Oct 21 20:10:06 2007 +0000
@@ -1,15 +1,19 @@
[phone]  Stefan Monnier  <[e-mail]>
+
+	* emacs-lisp/byte-opt.el (byte-optimize-featurep): Fix paren typo.
+
 2007-10-21  Dan Nicolaescu  <[e-mail]>
 
-	* w32-fns.el (w32-quote-process-args): 
+	* w32-fns.el (w32-quote-process-args):
 	* dos-w32.el (print-region-function, lpr-headers-switches)
 	(ps-print-region-function): Pacify byte-compiler.
 
 	* emulation/edt-mapper.el (function-key-map):
-	(edt-map-key): Make it a function instead of using fset. Inline
-	edt-gnu-map-key and edt-lucid-map-key. Use featurep 'xemacs.
+	(edt-map-key): Make it a function instead of using fset.
+	Inline edt-gnu-map-key and edt-lucid-map-key.  Use featurep 'xemacs.
 	(edt-gnu-map-key, edt-lucid-map-key): Remove.
 	(edt-x-emacs-p): Remove.
-	(edt-emacs-variant, edt-window-system, edt-xserver): 
+	(edt-emacs-variant, edt-window-system, edt-xserver):
 	Use featurep 'xemacs.
 
 	* net/eudc.el: Use (featurep 'xemacs) instead of the string test.
@@ -22,20 +26,18 @@
 	* net/eudc-bob.el (eudc-bob-generic-menu, eudc-bob-mail-keymap)
 	(eudc-bob-url-keymap, eudc-bob-sound-keymap)
 	(eudc-bob-generic-keymap, eudc-bob-popup-menu)
-	(eudc-bob-toggle-inline-display): 
-	* net/eudc-hotlist.el (eudc-hotlist-emacs-menu): Replace
-	eudc-emacs-p and eudc-xemacs-p with feature tests.
-
-	* net/eudcb-ph.el (eudc-ph-open-session): Replace
-	eudc-xemacs-mule-p with its former definition.
+	(eudc-bob-toggle-inline-display):
+	* net/eudc-hotlist.el (eudc-hotlist-emacs-menu):
+	Replace eudc-emacs-p and eudc-xemacs-p with feature tests.
+
+	* net/eudcb-ph.el (eudc-ph-open-session):
+	Replace eudc-xemacs-mule-p with its former definition.
 
 	* progmodes/octave-mod.el (octave-xemacs-p): Remove.
-	(octave-abbrev-start): Replace octave-xemacs-p with 
-	(featurep 'xemacs).
-
-	* progmodes/vera-mode.el (vera-xemacs): Remove. 
-	(vera-mode-syntax-table): Replace vera-xemacs with 
-	(featurep 'xemacs).
+	(octave-abbrev-start): Replace octave-xemacs-p with (featurep 'xemacs).
+
+	* progmodes/vera-mode.el (vera-xemacs): Remove.
+	(vera-mode-syntax-table): Replace vera-xemacs with (featurep 'xemacs).
 
 	* progmodes/vhdl-mode.el (vhdl-xemacs): Remove.
 	(vhdl-doc-mode, vhdl-doc-variable, vhdl-compile-init)
@@ -45,25 +47,24 @@
 	with (featurep 'xemacs).
 
 	* progmodes/antlr-mode.el (cond-emacs-xemacs-macfn, defunx)
-	(save-buffer-state-x): 
-	* obsolete/fast-lock.el (fast-lock-verbose): 
+	(save-buffer-state-x):
+	* obsolete/fast-lock.el (fast-lock-verbose):
 	* emulation/viper-init.el (viper-xemacs-p)
-	(viper-cond-compile-for-xemacs-or-emacs): 
-	* emacs-lisp/checkdoc.el (checkdoc-minor-mode-map): 
-	* ps-print.el (case-fold-search): 
-	* ediff-hook.el (ediff-cond-compile-for-xemacs-or-emacs): 
+	(viper-cond-compile-for-xemacs-or-emacs):
+	* emacs-lisp/checkdoc.el (checkdoc-minor-mode-map):
+	* ps-print.el (case-fold-search):
+	* ediff-hook.el (ediff-cond-compile-for-xemacs-or-emacs):
 	* calculator.el (calculator-help): Use featurep 'xemacs.
 
 	* progmodes/prolog.el: Undo previous change.
-	(comint-prompt-regexp, comint-process-echoes): Pacify
-	byte-compiler.
+	(comint-prompt-regexp, comint-process-echoes): Pacify byte-compiler.
 
 	* progmodes/dcl-mode.el:
 	* play/yow.el:
 	* calendar/todo-mode.el:
 	* calendar/cal-hebrew.el:
 	* vc-hg.el: Undo previous change.
-	
+
 	* vms-patch.el: Likewise.
 	(print-region-function): Pacify byte-compiler.
 
@@ -83,8 +84,7 @@
 	(tramp-do-copy-or-rename-file-out-of-band)
 	(tramp-maybe-open-connection): Use `make-temp-name'.  This is
 	possible, because we don't need to create the temporary file, but
-	we need a prefix for ssh, which has its own temporary file
-	handling.
+	we need a prefix for ssh, which has its own temporary file handling.
 	(tramp-handle-delete-directory): Add "-f" to rmdir.
 	(tramp-handle-dired-recursive-delete-directory): Call "rm -rf".
 	(tramp-handle-insert-file-contents): Don't raise a tramp-error but
@@ -107,14 +107,13 @@
 
 	* progmodes/dcl-mode.el: Require imenu at compile time.
 
-	* progmodes/cc-engine.el (c-maybe-stale-found-type): Pacify
-	byte-compiler.
-
-	* obsolete/fast-lock.el: Use featurep test instead of
-	string-match.
-
-	* eshell/esh-mode.el (eshell-handle-ansi-color): Require
-	ansi-color at compile time too.
+	* progmodes/cc-engine.el (c-maybe-stale-found-type):
+	Pacify byte-compiler.
+
+	* obsolete/fast-lock.el: Use featurep test instead of string-match.
+
+	* eshell/esh-mode.el (eshell-handle-ansi-color):
+	Require ansi-color at compile time too.
 
 	* eshell/em-unix.el (eshell/info): Require info at compile time too.
 
@@ -125,7 +124,7 @@
 
 2007-10-21  Stefan Monnier  <[e-mail]>
 
-	* double.el ([ignore]): Use ignore.
+	* double.el ([ignore]): Use `ignore'.
 	(double-setup): Inline into double-mode.
 	(double-mode): Use define-minor-mode.
 
@@ -2051,8 +2050,8 @@
 	Handle escaped parens.
 	(latex-forward-sexp): Doc fix.
 
-	* eshell/esh-mode.el (eshell-output-filter-functions): Add
-	eshell-postoutput-scroll-to-bottom.
+	* eshell/esh-mode.el (eshell-output-filter-functions):
+	Add eshell-postoutput-scroll-to-bottom.
 
 	* loadup.el: Remove termdev.
 

--- a/lisp/emacs-lisp/byte-opt.el	Sun Oct 21 19:35:11 2007 +0000
+++ b/lisp/emacs-lisp/byte-opt.el	Sun Oct 21 20:10:06 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))