From 9330792c28126d274275a05cce00d15e823c7f73 Mon Sep 17 00:00:00 2001 From: hayashi Date: Wed, 4 Nov 1998 09:53:11 +0000 Subject: [PATCH] (message-do-fcc): Don't run message-header-hook and message-before-do-fcc-hook. --- lisp/message.el | 1 - 1 file changed, 1 deletion(-) diff --git a/lisp/message.el b/lisp/message.el index 34b5773..cd20ca7 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -2775,7 +2775,6 @@ to find out how to use this." (while (setq file (message-fetch-field "fcc")) (push file list) (message-remove-header "fcc" nil t))) - (run-hooks 'message-header-hook 'message-before-do-fcc-hook) (goto-char (point-min)) (re-search-forward (concat "^" (regexp-quote mail-header-separator) "$")) (replace-match "" t t) -- 1.7.10.4