diff options
| author | Glenn Morris | 2012-08-09 23:53:52 -0700 |
|---|---|---|
| committer | Glenn Morris | 2012-08-09 23:53:52 -0700 |
| commit | 7aacaf15a2ec7d17e75d94b902fa895d7d196026 (patch) | |
| tree | c019a8aa811c8f7d867d424e5ab2d39608588056 /lisp/tutorial.el | |
| parent | 5f168c207f963826f0b13ad2dd5c39d08ae3c664 (diff) | |
| download | emacs-7aacaf15a2ec7d17e75d94b902fa895d7d196026.tar.gz emacs-7aacaf15a2ec7d17e75d94b902fa895d7d196026.zip | |
Disable local eval: in some places
* tutorial.el (help-with-tutorial):
* emacs-lisp/copyright.el (copyright-update-directory):
* emacs-lisp/autoload.el (autoload-find-generated-file)
(autoload-find-file): Disable local eval: (for insurance).
Diffstat (limited to 'lisp/tutorial.el')
| -rw-r--r-- | lisp/tutorial.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/tutorial.el b/lisp/tutorial.el index b512700f5b9..e43c878a17f 100644 --- a/lisp/tutorial.el +++ b/lisp/tutorial.el | |||
| @@ -830,7 +830,8 @@ Run the Viper tutorial? ")) | |||
| 830 | (if old-tut-file | 830 | (if old-tut-file |
| 831 | (progn | 831 | (progn |
| 832 | (insert-file-contents (tutorial--saved-file)) | 832 | (insert-file-contents (tutorial--saved-file)) |
| 833 | (let ((enable-local-variables :safe)) | 833 | (let ((enable-local-variables :safe) |
| 834 | (enable-local-eval nil)) | ||
| 834 | (hack-local-variables)) | 835 | (hack-local-variables)) |
| 835 | ;; FIXME? What we actually want is to ignore dir-locals (?). | 836 | ;; FIXME? What we actually want is to ignore dir-locals (?). |
| 836 | (setq buffer-read-only nil) ; bug#11118 | 837 | (setq buffer-read-only nil) ; bug#11118 |
| @@ -849,7 +850,8 @@ Run the Viper tutorial? ")) | |||
| 849 | (goto-char tutorial--point-before-chkeys) | 850 | (goto-char tutorial--point-before-chkeys) |
| 850 | (setq tutorial--point-before-chkeys (point-marker))) | 851 | (setq tutorial--point-before-chkeys (point-marker))) |
| 851 | (insert-file-contents (expand-file-name filename tutorial-directory)) | 852 | (insert-file-contents (expand-file-name filename tutorial-directory)) |
| 852 | (let ((enable-local-variables :safe)) | 853 | (let ((enable-local-variables :safe) |
| 854 | (enable-local-eval nil)) | ||
| 853 | (hack-local-variables)) | 855 | (hack-local-variables)) |
| 854 | ;; FIXME? What we actually want is to ignore dir-locals (?). | 856 | ;; FIXME? What we actually want is to ignore dir-locals (?). |
| 855 | (setq buffer-read-only nil) ; bug#11118 | 857 | (setq buffer-read-only nil) ; bug#11118 |