# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 800827035 0
# Node ID c5cf8807738b79fa1de6b36f7155a2b0f73606a7
# Parent  778a35aba3f7859280b339b89ad94fd053d3a13c
(tar-mode): Set write-contents-hooks instead of
local-write-file-hooks.

diff -r 778a35aba3f7 -r c5cf8807738b lisp/tar-mode.el
--- a/lisp/tar-mode.el	Thu May 18 19:50:57 1995 +0000
+++ b/lisp/tar-mode.el	Thu May 18 19:57:15 1995 +0000
@@ -584,8 +584,8 @@
   (setq mode-name "Tar")
   (use-local-map tar-mode-map)
   (auto-save-mode 0)
-  (make-local-variable 'local-write-file-hooks)
-  (setq local-write-file-hooks '(tar-mode-write-file))
+  (make-local-variable 'write-contents-hooks)
+  (setq write-contents-hooks '(tar-mode-write-file))
   (widen)
   (if (and (boundp 'tar-header-offset) tar-header-offset)
       (narrow-to-region 1 tar-header-offset)