Synch to Oort Gnus 200303200032.

[elisp/gnus.git-] / lisp / gnus-sum.el

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index ad9f6e5..5cc2b95 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -11218,18 +11218,7 @@ If REVERSE, save parts that do not match TYPE."
               (setcdr c (cons (list (caar list) (list 'quote (cdar list))) nil))
               (setq c (cdr c)
                     list (cdr list)))
-           (let ((byte-compile-warnings
-                  ;; Since XEmacs version of bytecomp complains about
-                  ;; the unbound variables because of `globally-boundp'
-                  ;; even if they are bound by `let', we silence it.
-                  (if (and (boundp 'byte-compile-default-warnings) ;; XEmacs
-                           (listp (symbol-value
-                                   'byte-compile-default-warnings)))
-                      (delq 'free-vars
-                            (copy-sequence (symbol-value
-                                            'byte-compile-default-warnings)))
-                    byte-compile-warnings)))
-             (gnus-byte-compile (list 'lambda nil cond)))))))
+            (gnus-byte-compile (list 'lambda nil cond))))))
 
 (defun gnus-summary-highlight-line ()
   "Highlight current line according to `gnus-summary-highlight'."