[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r101012: Evaluate file-local variable
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r101012: Evaluate file-local variables in tutorials. |
Date: |
Sat, 07 Aug 2010 12:31:03 +0300 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 101012
committer: Eli Zaretskii <address@hidden>
branch nick: trunk
timestamp: Sat 2010-08-07 12:31:03 +0300
message:
Evaluate file-local variables in tutorials.
tutorial.el (help-with-tutorial): Hack safe file-local variables
after reading the tutorial.
modified:
lisp/ChangeLog
lisp/tutorial.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2010-08-06 19:48:59 +0000
+++ b/lisp/ChangeLog 2010-08-07 09:31:03 +0000
@@ -1,3 +1,8 @@
+2010-08-07 Eli Zaretskii <address@hidden>
+
+ * tutorial.el (help-with-tutorial): Hack safe file-local variables
+ after reading the tutorial.
+
2010-08-06 Alan Mackenzie <address@hidden>
* progmodes/cc-cmds.el (c-mask-paragraph, c-fill-paragraph): Fix
=== modified file 'lisp/tutorial.el'
--- a/lisp/tutorial.el 2010-04-14 00:33:32 +0000
+++ b/lisp/tutorial.el 2010-08-07 09:31:03 +0000
@@ -829,6 +829,8 @@
(if old-tut-file
(progn
(insert-file-contents (tutorial--saved-file))
+ (let ((enable-local-variables :safe))
+ (hack-local-variables))
(goto-char (point-min))
(setq old-tut-point
(string-to-number
@@ -844,6 +846,8 @@
(goto-char tutorial--point-before-chkeys)
(setq tutorial--point-before-chkeys (point-marker)))
(insert-file-contents (expand-file-name filename tutorial-directory))
+ (let ((enable-local-variables :safe))
+ (hack-local-variables))
(forward-line)
(setq tutorial--point-before-chkeys (point-marker)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r101012: Evaluate file-local variables in tutorials.,
Eli Zaretskii <=