diff lisp/arc-mode.el @ 19998:b93ac48bafd1

(archive-mode): Use write-contents-hooks.
author Karl Heuer <kwzh@gnu.org>
date Fri, 26 Sep 1997 21:39:10 +0000
parents 09d355f9877e
children 5bf13ca1dbac
line wrap: on
line diff
--- a/lisp/arc-mode.el	Fri Sep 26 21:26:31 1997 +0000
+++ b/lisp/arc-mode.el	Fri Sep 26 21:39:10 1997 +0000
@@ -520,8 +520,8 @@
 	(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)