aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorGlenn Morris <[email protected]>2009-02-10 03:36:00 +0000
committerGlenn Morris <[email protected]>2009-02-10 03:36:00 +0000
commitefb656fd19a9284ecd3aa264d0ab76ee92abeb48 (patch)
treec98fabda1f897bce520a384b0026aaec8a9c2b55 /lisp
parenta8e8f947042cb152966c8962b7f70cdd04074bd9 (diff)
Just require rmail.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog25
-rw-r--r--lisp/mail/rmailsort.el12
2 files changed, 29 insertions, 8 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8d39cc70a0..3e43dfb74c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,28 @@
+2009-02-10 Glenn Morris <[email protected]>
+
+ * 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 <[email protected]>
* net/newst-treeview.el (newsticker-treeview-save)
diff --git a/lisp/mail/rmailsort.el b/lisp/mail/rmailsort.el
index e5b9da3ea6..e53bcdfa8a 100644
--- a/lisp/mail/rmailsort.el
+++ b/lisp/mail/rmailsort.el
@@ -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 @@ KEYWORDS is a comma-separated list of labels."
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 1st argument REVERSE is non-nil, sort them in reverse order.
(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.