(rmail-edit-mode): Set write-region-annotate-functions. (Bug#2625)
This commit is contained in:
parent
e6a498d964
commit
52b9c46105
2 changed files with 8 additions and 0 deletions
|
@ -1,3 +1,8 @@
|
|||
2009-03-11 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* mail/rmailedit.el (rmail-edit-mode):
|
||||
Set write-region-annotate-functions. (Bug#2625)
|
||||
|
||||
2009-03-10 Juanma Barranquero <lekktu@gmail.com>
|
||||
|
||||
* w32-vars.el (w32-list-proportional-fonts): Fix typos in last change.
|
||||
|
|
|
@ -64,6 +64,9 @@ This function runs the hooks `text-mode-hook' and `rmail-edit-mode-hook'.
|
|||
(if (boundp 'mode-line-modified)
|
||||
(setq mode-line-modified (default-value 'mode-line-modified))
|
||||
(setq mode-line-format (default-value 'mode-line-format)))
|
||||
;; If someone uses C-x C-s, don't clobber the rmail file (bug#2625).
|
||||
(add-hook 'write-region-annotate-functions
|
||||
'rmail-write-region-annotate nil t)
|
||||
(run-mode-hooks 'rmail-edit-mode-hook)))
|
||||
|
||||
;; Rmail Edit mode is suitable only for specially formatted data.
|
||||
|
|
Loading…
Add table
Reference in a new issue