# HG changeset patch # User Gerd Moellmann # Date 989229941 0 # Node ID 003e23c611eb2b58277d68d9a20122b6df6f5c94 # Parent f6d996921604562563a0e446634ca0edb0bf7b90 (rmail-summary-sort-by-labels): Renamed from rmail-summary-sort-by-keywords. Doc fix. (rmail-summary-mode): Doc fix. diff -r f6d996921604 -r 003e23c611eb lisp/mail/rmailsum.el --- a/lisp/mail/rmailsum.el Mon May 07 09:59:43 2001 +0000 +++ b/lisp/mail/rmailsum.el Mon May 07 10:05:41 2001 +0000 @@ -723,7 +723,7 @@ \\[rmail-summary-sort-by-recipient] Sort by recipient. \\[rmail-summary-sort-by-correspondent] Sort by correspondent. \\[rmail-summary-sort-by-lines] Sort by lines. -\\[rmail-summary-sort-by-keywords] Sort by keywords." +\\[rmail-summary-sort-by-labels] Sort by labels." (interactive) (kill-all-local-variables) (setq major-mode 'rmail-summary-mode) @@ -893,7 +893,7 @@ (define-key rmail-summary-mode-map "\C-c\C-s\C-l" 'rmail-summary-sort-by-lines) (define-key rmail-summary-mode-map "\C-c\C-s\C-k" - 'rmail-summary-sort-by-keywords) + 'rmail-summary-sort-by-labels) ) ;;; Menu bar bindings. @@ -1610,14 +1610,14 @@ (interactive "P") (rmail-sort-from-summary (function rmail-sort-by-lines) reverse)) -(defun rmail-summary-sort-by-keywords (reverse labels) - "Sort messages of current Rmail summary by keywords. +(defun rmail-summary-sort-by-labels (reverse labels) + "Sort messages of current Rmail summary by labels. If prefix argument REVERSE is non-nil, sort them in reverse order. KEYWORDS is a comma-separated list of labels." (interactive "P\nsSort by labels: ") (rmail-sort-from-summary (function (lambda (reverse) - (rmail-sort-by-keywords reverse labels))) + (rmail-sort-by-labels reverse labels))) reverse)) (defun rmail-sort-from-summary (sortfun reverse)