# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 765689358 0
# Node ID 19e24f8977229ee08688664c3834f3cbb78c8492
# Parent  c13953896b24e42cc99abc797457c61b386d4d7b
(rmail-mode-map): Key binding for rmail-sort-by-keywords.

diff -r c13953896b24 -r 19e24f897722 lisp/mail/rmail.el
--- a/lisp/mail/rmail.el	Thu Apr 07 03:29:02 1994 +0000
+++ b/lisp/mail/rmail.el	Thu Apr 07 03:29:18 1994 +0000
@@ -375,6 +375,7 @@
   (define-key rmail-mode-map "\C-c\C-s\C-r" 'rmail-sort-by-recipient)
   (define-key rmail-mode-map "\C-c\C-s\C-c" 'rmail-sort-by-correspondent)
   (define-key rmail-mode-map "\C-c\C-s\C-l" 'rmail-sort-by-lines)
+  (define-key rmail-mode-map "\C-c\C-s\C-k" 'rmail-sort-by-keywords)
   )
 
 (define-key rmail-mode-map [menu-bar] (make-sparse-keymap))
@@ -2167,6 +2168,11 @@
 (autoload 'rmail-sort-by-lines "rmailsort"
   "Sort messages of current Rmail file by number of lines.
 If prefix argument REVERSE is non-nil, sort them in reverse order." t)
+
+(autoload 'rmail-sort-by-keywords "rmailsort"
+  "Sort messages of current Rmail file by labels.
+If prefix argument REVERSE is non-nil, sort them in reverse order.
+KEYWORDS is a comma-separated list of labels." t)
 
 ;;;; *** Rmail Summary Mode ***