From e7b5559c8d145ca9325a10633284f4821f438200 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Wed, 4 Nov 1998 09:58:50 +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 20d6410..22bfc3e 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -2838,7 +2838,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