[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/mail/rmailsum.el, v [EMACS_22_BASE]
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/mail/rmailsum.el, v [EMACS_22_BASE] |
Date: |
Thu, 07 Jun 2007 06:33:12 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Branch: EMACS_22_BASE
Changes by: Glenn Morris <gm> 07/06/07 06:33:12
Index: rmailsum.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/mail/rmailsum.el,v
retrieving revision 1.144
retrieving revision 1.144.2.1
diff -u -b -r1.144 -r1.144.2.1
--- rmailsum.el 21 Jan 2007 02:59:07 -0000 1.144
+++ rmailsum.el 7 Jun 2007 06:33:12 -0000 1.144.2.1
@@ -855,6 +855,15 @@
(rmail-show-message msg-num t))))))
(rmail-summary-update-highlight nil)))))
+(defun rmail-summary-save-buffer ()
+ "Save the buffer associated with this RMAIL summary."
+ (interactive)
+ (save-window-excursion
+ (save-excursion
+ (switch-to-buffer rmail-buffer)
+ (save-buffer))))
+
+
(if rmail-summary-mode-map
nil
(setq rmail-summary-mode-map (make-keymap))
@@ -923,6 +932,7 @@
'rmail-summary-sort-by-lines)
(define-key rmail-summary-mode-map "\C-c\C-s\C-k"
'rmail-summary-sort-by-labels)
+ (define-key rmail-summary-mode-map "\C-x\C-s" 'rmail-summary-save-buffer)
)
;;; Menu bar bindings.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/mail/rmailsum.el, v [EMACS_22_BASE],
Glenn Morris <=