(top-level): No need to require gnus when compiling,

since unconditionally required near start of file.
(gnus-summary-display-while-building): Move definition before use.

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 4c6dad5872bd3af7a530a177836644cf357ecac3..e68544a96f9e114db15dd66476e7a4ffe7f17462 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,11 +1,17 @@
+2008-03-04  Glenn Morris  <rgm@gnu.org>
+
+       * gnus-sum.el (top-level): No need to require gnus when compiling,
+       since unconditionally required near start of file.
+       (gnus-summary-display-while-building): Move definition before use.
+
 2008-03-03  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * mm-bodies.el (mm-decode-content-transfer-encoding): Simplify.
 
        * gnus-sum.el: Use inhibit-read-only and with-current-buffer.
-       (gnus-summary-jump-to-group): Consider windows on other displayed frames as
-       well.  Similar changes might be needed elsewhere, but that's the one I've
-       bumped into during my use.
+       (gnus-summary-jump-to-group): Consider windows on other displayed
+       frames as well.  Similar changes might be needed elsewhere, but that's
+       the one I've bumped into during my use.
 
        * nndoc.el (nndoc-oe-dbx-type-p):
        * gnus-msg.el (gnus-debug):

diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index c68632c04ff690a7620e1c2926d8a27e16382bbe..f4dc4ea43cda590c6cc8c7787ad516b9b5d41c8e 100644 (file)
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -1578,7 +1578,6 @@ For example:
     (if (boundp 'gnus-newsgroup-variables)
         nil
       (load "gnus-sum.el" t t t))
-    (require 'gnus)
     (require 'gnus-art)))
 
 ;; MIME stuff.
@@ -5015,6 +5014,16 @@ If nil, use subject instead."
   :type 'string
   :group 'gnus-thread)
 
+(defcustom gnus-summary-display-while-building nil
+  "If non-nil, show and update the summary buffer as it's being built.
+If the value is t, update the buffer after every line is inserted.  If
+the value is an integer (N), update the display every N lines."
+  :version "22.1"
+  :group 'gnus-thread
+  :type '(choice (const :tag "off" nil)
+                number
+                (const :tag "frequently" t)))
+
 (defun gnus-summary-prepare-threads (threads)
   "Prepare summary buffer from THREADS and indentation LEVEL.
 THREADS is either a list of `(PARENT [(CHILD1 [(GRANDCHILD ...]...) ...])'
@@ -9796,16 +9805,6 @@ If nil, use to the current newsgroup method."
   :type 'symbol
   :group 'gnus-summary-mail)
 
-(defcustom gnus-summary-display-while-building nil
-  "If non-nil, show and update the summary buffer as it's being built.
-If the value is t, update the buffer after every line is inserted.  If
-the value is an integer (N), update the display every N lines."
-  :version "22.1"
-  :group 'gnus-thread
-  :type '(choice (const :tag "off" nil)
-                number
-                (const :tag "frequently" t)))
-
 (defun gnus-summary-respool-article (&optional n method)
   "Respool the current article.
 The article will be squeezed through the mail spooling process again,