Mercurial > emacs
changeset 37588:9adbbd869684
(rmail-edit-mode): Doc fix.
(rmail-edit-mode-hook): New user-option.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Mon, 07 May 2001 09:59:08 +0000 |
| parents | d9239fc54bce |
| children | f6d996921604 |
| files | lisp/mail/rmailedit.el |
| diffstat | 1 files changed, 9 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/rmailedit.el Mon May 07 09:58:38 2001 +0000 +++ b/lisp/mail/rmailedit.el Mon May 07 09:59:08 2001 +0000 @@ -1,6 +1,6 @@ ;;; rmailedit.el --- "RMAIL edit mode" Edit the current message. -;; Copyright (C) 1985, 1994 Free Software Foundation, Inc. +;; Copyright (C) 1985, 1994, 2001 Free Software Foundation, Inc. ;; Maintainer: FSF ;; Keywords: mail @@ -26,6 +26,11 @@ (require 'rmail) +(defcustom rmail-edit-mode-hook nil + "List of functions to call when editing an RMAIL message." + :type 'hook + :group 'rmail-edit) + (defvar rmail-old-text) (defvar rmail-edit-map nil) @@ -44,9 +49,10 @@ "Major mode for editing the contents of an RMAIL message. The editing commands are the same as in Text mode, together with two commands to return to regular RMAIL: - * rmail-abort-edit cancels the changes + * \\[rmail-abort-edit] cancels the changes you have made and returns to RMAIL - * rmail-cease-edit makes them permanent. + * \\[rmail-cease-edit] makes them permanent. +This functions runs the normal hook `rmail-edit-mode-hook'. \\{rmail-edit-map}" (text-mode) (use-local-map rmail-edit-map)