Added section on local variables.

1 files changed, 7 insertions, 2 deletions

diff --git a/lisp/tpu-doc.el b/lisp/tpu-doc.el
index c5a9cc8bbd9..c65d0aa635a 100644
--- a/lisp/tpu-doc.el
+++ b/lisp/tpu-doc.el
@@ -1,4 +1,5 @@
 ;;; tpu-doc.el --- Documentation for TPU-edt
+
 ;; Copyright (C) 1993 Free Software Foundation, Inc.
 
 ;; Author: Rob Riepel <riepel@networking.stanford.edu>
@@ -21,8 +22,7 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
-;;; Revision: $Id: tpu-doc.el,v 1.2 1993/08/04 08:18:28 rms Exp rms $
-(defconst tpu-doc-revision "$Revision: 1.2 $"
+(defconst tpu-doc-revision "$Revision: 1.3 $"
   "TPU-edt documentation revision number.")
 
 
@@ -312,6 +312,11 @@
 ;; hate that!  This line will make sure that files end with newlines.
 (setq require-final-newline t)
 
+;; Emacs has the ability to automatically run code embedded in files
+;; you edit.  This line makes emacs ask if you want to run the code.
+(if tpu-emacs19-p (setq enable-local-variables "ask")
+  (setq inhibit-local-variables t))
+
 ;; Emacs uses Control-s and Control-q.  Problems can occur when using emacs
 ;; on terminals that use these codes for flow control (Xon/Xoff flow control).
 ;; These lines disable emacs' use of these characters.