diff options
| author | Sam Steingold <sds@gnu.org> | 2017-11-22 16:05:45 -0500 |
|---|---|---|
| committer | Sam Steingold <sds@gnu.org> | 2017-11-22 16:14:36 -0500 |
| commit | 72688426cef4e5128ce68f75cb8a3f31572daec0 (patch) | |
| tree | bdef625dc3dcd1b365da7ab87bb483e8f7c09d8b /lisp/mh-e/mh-letter.el | |
| parent | 6710c265aa300bd29e5841a88c03ca101d3d1f75 (diff) | |
| download | emacs-72688426cef4e5128ce68f75cb8a3f31572daec0.tar.gz | |
Remove *-yank-hooks aliases for -citation-hook, obsolete since 19.34.
* lisp/simple.el (compose-mail): Use `mail-citation-hook'
instead of `mail-yank-hooks'.
* lisp/mail/sendmail.el (mail-yank-hooks): Remove.
(mail-yank-original, mail-yank-region): Drop `mail-yank-hooks'.
* lisp/mh-e/mh-letter.el (mh-yank-hooks): Remove.
(mh-insert-prefix-string): Drop `mh-yank-hooks'.
Diffstat (limited to 'lisp/mh-e/mh-letter.el')
| -rw-r--r-- | lisp/mh-e/mh-letter.el | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/lisp/mh-e/mh-letter.el b/lisp/mh-e/mh-letter.el index 28c18e4dd2f..871ba49522a 100644 --- a/lisp/mh-e/mh-letter.el +++ b/lisp/mh-e/mh-letter.el @@ -60,17 +60,6 @@ (to . mh-alias-letter-expand-alias)) "Alist of header fields and completion functions to use.") -(defvar mh-yank-hooks nil - "Obsolete hook for modifying a citation just inserted in the mail buffer. - -Each hook function can find the citation between point and mark. -And each hook function should leave point and mark around the -citation text as modified. - -This is a normal hook, misnamed for historical reasons. -It is obsolete and is only used if `mail-citation-hook' is nil.") -(mh-make-obsolete-variable 'mh-yank-hooks 'mail-citation-hook "19.34") - ;;; Letter Menu @@ -972,8 +961,6 @@ Otherwise, simply insert MH-INS-STRING before each line." (sc-cite-original)) (mail-citation-hook (run-hooks 'mail-citation-hook)) - (mh-yank-hooks ;old hook name - (run-hooks 'mh-yank-hooks)) (t (or (bolp) (forward-line 1)) (while (< (point) (point-max)) |