diff options
| author | Karl Heuer | 1995-05-18 19:57:15 +0000 |
|---|---|---|
| committer | Karl Heuer | 1995-05-18 19:57:15 +0000 |
| commit | 9a0341b21a63d2c8be95d6f3b22588aaabdb84ea (patch) | |
| tree | c76cb32926a6a21e30f2c3d15e0529682ebbc5b5 | |
| parent | 585458387f90545b6549453c0d3a583313c7a2a7 (diff) | |
| download | emacs-9a0341b21a63d2c8be95d6f3b22588aaabdb84ea.tar.gz emacs-9a0341b21a63d2c8be95d6f3b22588aaabdb84ea.zip | |
(tar-mode): Set write-contents-hooks instead of
local-write-file-hooks.
| -rw-r--r-- | lisp/tar-mode.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el index e640797d897..3398b644e69 100644 --- a/lisp/tar-mode.el +++ b/lisp/tar-mode.el | |||
| @@ -584,8 +584,8 @@ See also: variables `tar-update-datestamp' and `tar-anal-blocksize'. | |||
| 584 | (setq mode-name "Tar") | 584 | (setq mode-name "Tar") |
| 585 | (use-local-map tar-mode-map) | 585 | (use-local-map tar-mode-map) |
| 586 | (auto-save-mode 0) | 586 | (auto-save-mode 0) |
| 587 | (make-local-variable 'local-write-file-hooks) | 587 | (make-local-variable 'write-contents-hooks) |
| 588 | (setq local-write-file-hooks '(tar-mode-write-file)) | 588 | (setq write-contents-hooks '(tar-mode-write-file)) |
| 589 | (widen) | 589 | (widen) |
| 590 | (if (and (boundp 'tar-header-offset) tar-header-offset) | 590 | (if (and (boundp 'tar-header-offset) tar-header-offset) |
| 591 | (narrow-to-region 1 tar-header-offset) | 591 | (narrow-to-region 1 tar-header-offset) |