(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.

2 files changed, 19 insertions, 14 deletions

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 4c6dad5872b..e68544a96f9 100644
--- 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 c68632c04ff..f4dc4ea43cd 100644
--- 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,