changeset 101918:97184480e9dc

Just require rmail.
author Glenn Morris <rgm@gnu.org>
date Tue, 10 Feb 2009 03:36:00 +0000
parents 4b1bce6e82a6
children fbf831e1e7b0
files lisp/ChangeLog lisp/mail/rmailsort.el
diffstat 2 files changed, 29 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Tue Feb 10 03:33:48 2009 +0000
+++ b/lisp/ChangeLog	Tue Feb 10 03:36:00 2009 +0000
@@ -1,3 +1,28 @@
+2009-02-10  Glenn Morris  <rgm@gnu.org>
+
+	* mail/rmailsort.el: Just require rmail.
+
+	* mail/rmailedit.el: Just require rmail.
+	(rmail-old-pruned): Add doc string.
+	(rmail-edit-current-message): Use rmail-msg-is-pruned.
+	(rmail-cease-edit): Don't mangle the leading From line.
+	Don't mark as edited if there were no changes.  (Bug#2256)
+	Correctly restore header state.
+
+	* mail/rmail.el (rmail-automatic-folder-directives): Doc fix.
+	(rmail-current-message, rmail-total-messages)
+	(rmail-message-vector, rmail-deleted-vector): Add doc strings.
+	(rmail-duplicate-message): Doc fix.
+	(rmail-get-header-1, rmail-set-header-1, rmail-set-attribute-1):
+	New functions.
+	(rmail-get-header, rmail-set-header, rmail-set-attribute):
+	Use rmail-apply-in-message.
+	(rmail-message-attr-p): Use rmail-get-header, hence no longer requires
+	unswapped-ness.
+	(rmail-get-attr-names): Check for missing or corrupt attribute headers.
+	(rmail-auto-file): Set the filed attribute, rather than explicitly not
+	doing so.  (Bug#2231)
+
 2009-02-09  Ulf Jasper  <ulf.jasper@web.de>
 
 	* net/newst-treeview.el (newsticker-treeview-save)
--- a/lisp/mail/rmailsort.el	Tue Feb 10 03:33:48 2009 +0000
+++ b/lisp/mail/rmailsort.el	Tue Feb 10 03:36:00 2009 +0000
@@ -26,14 +26,7 @@
 
 ;;; Code:
 
-(eval-when-compile
-  (require 'mail-utils)
-  (require 'sort)
-  (require 'rmail))
-
-(autoload 'timezone-make-date-sortable "timezone")
-
-(declare-function rmail-update-summary "rmailsum" (&rest ignore))
+(require 'rmail)
 
 ;; Sorting messages in Rmail buffer
 
@@ -153,6 +146,7 @@
 			      n))))))
 
 ;; Basic functions
+(declare-function rmail-update-summary "rmailsum" (&rest ignore))
 
 (defun rmail-sort-messages (reverse keyfun)
   "Sort messages of current Rmail file.
@@ -228,6 +222,8 @@
 	(if (rmail-summary-exists)
 	    (rmail-select-summary (rmail-update-summary)))))))
 
+(autoload 'timezone-make-date-sortable "timezone")
+
 (defun rmail-make-date-sortable (date)
   "Make DATE sortable using the function string-lessp."
   ;; Assume the default time zone is GMT.