From 064c2d8f58b2f4fc6f770dbb776c91135f77662f Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Tue, 9 Jan 1996 23:19:28 +0000 Subject: (mh-display-msg): Use kill-local-variable to clear out write-contents-hooks. --- lisp/mail/mh-utils.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/mail') diff --git a/lisp/mail/mh-utils.el b/lisp/mail/mh-utils.el index a77205a26d0..b460a127b21 100644 --- a/lisp/mail/mh-utils.el +++ b/lisp/mail/mh-utils.el @@ -25,7 +25,7 @@ ;;; Change Log: -;; $Id: mh-utils.el,v 1.5 1995/04/25 22:27:45 kwzh Exp kwzh $ +;; $Id: mh-utils.el,v 1.6 1995/11/03 02:29:09 kwzh Exp kwzh $ ;;; Code: @@ -300,7 +300,7 @@ Type \"\\[mh-header-display]\" to see the message with all its headers." ;; Changing contents, so this hook needs to be reinitialized. ;; pgp.el uses this. (if (boundp 'write-contents-hooks) ;Emacs 19 - (setq write-contents-hooks nil)) + (kill-local-variable 'write-contents-hooks)) (if formfile (mh-exec-lib-cmd-output "mhl" "-nobell" "-noclear" (if (stringp formfile) -- cgit v1.2.1