Merge from emacs--devo--0, emacs--rel--22

Patches applied:

 * emacs--devo--0  (patch 960, 967)

   - Update from CVS
   - Merge from gnus--devo--0

 * emacs--rel--22  (patch 164, 172)

   - Merge from gnus--rel--5.10

2007-12-19  Glenn Morris  <rgm@gnu.org>

   * lisp/mml.el (message-options-set, message-narrow-to-head)
   (message-in-body-p, message-mail-p, message-encode-message-body):
   Autoload.
   (message-remove-header, message-narrow-to-headers-or-head)
   (message-subscribed-p, message-make-mail-followup-to)
   (message-position-on-field, message-news-p)
   (message-options-set-recipient, message-generate-headers)
   (message-sort-headers): Declare as functions.

Revision: emacs@sv.gnu.org/gnus--devo--0--patch-436

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 543231d..182c383 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -47,6 +47,17 @@
        * encrypt.el: Clarify documentation.  Load password-cache or
        password, whichever one is found first, instead of autoloading.
 
+2007-12-19  Glenn Morris  <rgm@gnu.org>
+
+       * mml.el (message-options-set, message-narrow-to-head)
+       (message-in-body-p, message-mail-p, message-encode-message-body):
+       Autoload.
+       (message-remove-header, message-narrow-to-headers-or-head)
+       (message-subscribed-p, message-make-mail-followup-to)
+       (message-position-on-field, message-news-p)
+       (message-options-set-recipient, message-generate-headers)
+       (message-sort-headers): Declare as functions.
+
 2007-12-18  Reiner Steib  <Reiner.Steib@gmx.de>
 
        * gnus-draft.el (gnus-draft-send-message): Mention process/prefix

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 62068d8..1f680c6 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -1563,7 +1563,9 @@ For example:
         \"^From:\\\\|^Newsgroups:\\\\|^Subject:\\\\|^Date:\\\\|^To:\")))
 ")
 
-;; Byte-compiler warning.
+;; Byte-compiler warning.  Specifically, this is responsible for:
+;; "Warning: the following functions might not be defined at runtime:
+;; gnus-build-sparse-threads, gnus-dead-summary-mode, gnus-summary-mark-below".
 (eval-when-compile
   ;; Bind features so that require will believe that gnus-sum has
   ;; already been loaded (avoids infinite recursion)

diff --git a/lisp/mml.el b/lisp/mml.el
index ec37c2b..1c66353 100644 (file)
--- a/lisp/mml.el
+++ b/lisp/mml.el
@@ -47,6 +47,11 @@
   (autoload 'message-posting-charset "message")
   (autoload 'dnd-get-local-file-name "dnd"))
 
+(autoload 'message-options-set    "message")
+(autoload 'message-narrow-to-head "message")
+(autoload 'message-in-body-p      "message")
+(autoload 'message-mail-p         "message")
+
 (defvar gnus-article-mime-handles)
 (defvar gnus-mouse-2)
 (defvar gnus-newsrc-hashtb)
@@ -836,6 +841,10 @@ If MML is non-nil, return the buffer up till the correspondent mml tag."
 ;;; Transforming MIME to MML
 ;;;
 
+;; message-narrow-to-head autoloads message.
+(declare-function message-remove-header "message"
+                  (header &optional is-regexp first reverse))
+
 (defun mime-to-mml (&optional handles)
   "Translate the current buffer (which should be a message) into MML.
 If HANDLES is non-nil, use it instead reparsing the buffer."
@@ -861,6 +870,9 @@ If HANDLES is non-nil, use it instead reparsing the buffer."
     (message-remove-header "Content-Disposition")
     (message-remove-header "Content-Transfer-Encoding")))
 
+(autoload 'message-encode-message-body "message")
+(declare-function message-narrow-to-headers-or-head "message" ())
+
 (defun mml-to-mime ()
   "Translate the current buffer from MML to MIME."
   (message-encode-message-body)
@@ -1308,6 +1320,11 @@ TYPE is the MIME type to use."
   (mml-insert-tag 'part 'type type 'disposition "inline")
   (forward-line -1))
 
+(declare-function message-subscribed-p "message" ())
+(declare-function message-make-mail-followup-to "message"
+                  (&optional only-show-subscribed))
+(declare-function message-position-on-field "message" (header &rest afters))
+
 (defun mml-preview-insert-mail-followup-to ()
   "Insert a Mail-Followup-To header before previewing an article.
 Should be adopted if code in `message-send-mail' is changed."
@@ -1325,6 +1342,11 @@ Should be adopted if code in `message-send-mail' is changed."
 (declare-function widget-event-point "wid-edit" (event))
 ;; If gnus-buffer-configuration is bound this is loaded.
 (declare-function gnus-configure-windows "gnus-win" (setting &optional force))
+;; Called after message-mail-p, which autoloads message.
+(declare-function message-news-p                "message" ())
+(declare-function message-options-set-recipient "message" ())
+(declare-function message-generate-headers      "message" (headers))
+(declare-function message-sort-headers          "message" ())
 
 (defun mml-preview (&optional raw)
   "Display current buffer with Gnus, in a new buffer.