aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1998-06-13 06:01:11 +0000
committerRichard M. Stallman1998-06-13 06:01:11 +0000
commit678b159e98ccad4066bdae675bd5b7cc168efd1e (patch)
tree10abcc14f9708bb6d8b38919b6007111947dc10a
parent28138f8c19a2b653065568ea708e8ca20753039b (diff)
downloademacs-678b159e98ccad4066bdae675bd5b7cc168efd1e.tar.gz
emacs-678b159e98ccad4066bdae675bd5b7cc168efd1e.zip
(tar-mode): Locally bind local-enable-local-variables,
not enable-local-variables.
-rw-r--r--lisp/tar-mode.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el
index 767f0d915bc..7e5794410be 100644
--- a/lisp/tar-mode.el
+++ b/lisp/tar-mode.el
@@ -111,7 +111,7 @@ how many null padding bytes go on the end of the tar file."
111 :group 'tar) 111 :group 'tar)
112 112
113(defcustom tar-update-datestamp nil 113(defcustom tar-update-datestamp nil
114 "*Non-nil means tar-mode should play fast and loose with sub-file datestamps. 114 "*Non-nil means Tar mode should play fast and loose with sub-file datestamps.
115If this is true, then editing and saving a tar file entry back into its 115If this is true, then editing and saving a tar file entry back into its
116tar file will update its datestamp. If false, the datestamp is unchanged. 116tar file will update its datestamp. If false, the datestamp is unchanged.
117You may or may not want this - it is good in that you can tell when a file 117You may or may not want this - it is good in that you can tell when a file
@@ -306,7 +306,7 @@ write-date, checksum, link-type, and link-name."
306 (tar-dotimes (i L) 306 (tar-dotimes (i L)
307 (if (or (< (aref string i) ?0) 307 (if (or (< (aref string i) ?0)
308 (> (aref string i) ?7)) 308 (> (aref string i) ?7))
309 (error "'%c' is not an octal digit")))) 309 (error "`%c' is not an octal digit"))))
310 (tar-parse-octal-integer string)) 310 (tar-parse-octal-integer string))
311 311
312 312
@@ -597,8 +597,8 @@ See also: variables `tar-update-datestamp' and `tar-anal-blocksize'.
597 (setq require-final-newline nil) ; binary data, dude... 597 (setq require-final-newline nil) ; binary data, dude...
598 (make-local-variable 'revert-buffer-function) 598 (make-local-variable 'revert-buffer-function)
599 (setq revert-buffer-function 'tar-mode-revert) 599 (setq revert-buffer-function 'tar-mode-revert)
600 (make-local-variable 'enable-local-variables) 600 (make-local-variable 'local-enable-local-variables)
601 (setq enable-local-variables nil) 601 (setq local-enable-local-variables nil)
602 (make-local-variable 'next-line-add-newlines) 602 (make-local-variable 'next-line-add-newlines)
603 (setq next-line-add-newlines nil) 603 (setq next-line-add-newlines nil)
604 (setq major-mode 'tar-mode) 604 (setq major-mode 'tar-mode)