diff options
Diffstat (limited to 'lisp/gnus/nndraft.el')
| -rw-r--r-- | lisp/gnus/nndraft.el | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/gnus/nndraft.el b/lisp/gnus/nndraft.el index 5f57dd2bf7c..f10b6fa3df8 100644 --- a/lisp/gnus/nndraft.el +++ b/lisp/gnus/nndraft.el @@ -203,12 +203,7 @@ are generated if and only if they are also in `message-draft-headers'.") (setq buffer-file-name (expand-file-name file) buffer-auto-save-file-name (make-auto-save-file-name)) (clear-visited-file-modtime) - (let ((hook (if (boundp 'write-contents-functions) - 'write-contents-functions - 'write-contents-hooks))) - (gnus-make-local-hook hook) - (add-hook hook 'nndraft-generate-headers nil t)) - (gnus-make-local-hook 'after-save-hook) + (add-hook 'write-contents-functions 'nndraft-generate-headers nil t) (add-hook 'after-save-hook 'nndraft-update-unread-articles nil t) (message-add-action '(nndraft-update-unread-articles) 'exit 'postpone 'kill) |