From: Karl Heuer <kwzh@gnu.org>
Date: Fri, 26 Sep 1997 21:39:10 +0000 (+0000)
Subject: (archive-mode): Use write-contents-hooks.
X-Git-Tag: emacs-20.3~3075
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2c1e5f9b25cc8c277c8af90b0c2ce0d36ed5b3f1;p=emacs.git

(archive-mode): Use write-contents-hooks.
---

diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el
index 72a5578f38d..767093ef51d 100644
--- a/lisp/arc-mode.el
+++ b/lisp/arc-mode.el
@@ -520,8 +520,8 @@ archive.
 	(make-local-variable 'revert-buffer-function)
 	(setq revert-buffer-function 'archive-mode-revert)
 	(auto-save-mode 0)
-	(make-local-variable 'local-write-file-hooks)
-	(add-hook 'local-write-file-hooks 'archive-write-file)
+	(make-local-variable 'write-contents-hooks)
+	(add-hook 'write-contents-hooks 'archive-write-file)
 
 	;; Real file contents is binary
 	(make-local-variable 'require-final-newline)