Changes committed gnus/lisp (ChangeLog gnus-sum.el mml.el)
"Miles Bader" <[email protected]>
| Newsgroups | gmane.emacs.gnus.commits |
|---|---|
| Message-ID | <[email protected]> |
Modified: ChangeLog gnus-sum.el mml.el 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 <[email protected]> * 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: [email protected]/gnus--devo--0--patch-436 Index: ChangeLog diff -u gnus/lisp/ChangeLog:7.1722 gnus/lisp/ChangeLog:7.1723 --- ChangeLog:7.1722 Fri Dec 28 23:28:04 2007 +++ ChangeLog Fri Dec 28 23:28:12 2007 @@ -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 <[email protected]> + + * 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 <[email protected]> * gnus-draft.el (gnus-draft-send-message): Mention process/prefix Index: gnus-sum.el diff -u gnus/lisp/gnus-sum.el:7.210 gnus/lisp/gnus-sum.el:7.211 --- gnus-sum.el:7.210 Sun Dec 16 05:23:18 2007 +++ gnus-sum.el Fri Dec 28 23:28:12 2007 @@ -1563,7 +1563,9 @@ \"^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) Index: mml.el diff -u gnus/lisp/mml.el:7.57 gnus/lisp/mml.el:7.58 --- mml.el:7.57 Sun Dec 16 05:23:18 2007 +++ mml.el Fri Dec 28 23:28:12 2007 @@ -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 @@ ;;; 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 @@ (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 @@ (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 @@ (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.