mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

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

Browse source 
since unconditionally required near start of file.
(gnus-summary-display-while-building): Move definition before use.
This commit is contained in:
Glenn Morris 2008-03-04 03:52:22 +00:00
parent c921c7ed8f
commit 1fc3462496
2 changed files with 19 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

12
lisp/gnus/ChangeLog
View file

@ -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):

21
lisp/gnus/gnus-sum.el
View file

@ -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,