mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-02 11:21:42 +00:00
Code Issues Releases Activity

(tar-mode): Set write-contents-hooks instead of

Browse Source 
local-write-file-hooks.
This commit is contained in:
Karl Heuer 1995-05-18 19:57:15 +00:00
parent 585458387f
commit 9a0341b21a
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/tar-mode.el
View File

@ -584,8 +584,8 @@ See also: variables `tar-update-datestamp' and `tar-anal-blocksize'.
(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)