;;; tpu-doc.el --- Documentation for TPU-edt
-;; Copyright (C) 1993 Free Software Foundation, Inc.
+
+;; Copyright (C) 1993, 1994 Free Software Foundation, Inc.
;; Author: Rob Riepel <riepel@networking.stanford.edu>
;; Maintainer: Rob Riepel <riepel@networking.stanford.edu>
-;; Keywords: tpu-edt
+;; Keywords: emulations
;; This file is part of GNU Emacs.
;; 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 3.2 1993/08/01 21:36:48 riepel Exp $
-(defconst tpu-doc-revision "$Revision: 3.2 $"
- "TPU-edt documentation revision number.")
-
;; This is documentation for the TPU-edt editor for GNU emacs. Major
;; sections of this document are separated with lines that begin with
;; %% Introduction
-;; TPU-edt is based on tpu.el by Jeff Kowalski. TPU-edt endeavors
-;; to be even more like TPU's EDT emulation than the original tpu.el.
-;; Considerable effort has been expended to that end. Still, emacs
-;; is emacs and there are differences between TPU-edt and the real
-;; thing. Please read the "Differences Between TPU-edt and the Real
-;; Thing" and "Starting TPU-edt" sections before running TPU-edt.
+;; TPU-edt is based on tpu.el by Jeff Kowalski and Bob Covey. TPU-edt
+;; endeavors to be even more like TPU's EDT emulation than the original
+;; tpu.el. Considerable effort has been expended to that end. Still,
+;; emacs is emacs and there are differences between TPU-edt and the
+;; real thing. Please read the "Differences Between TPU-edt and the
+;; Real Thing" and "Starting TPU-edt" sections before running TPU-edt.
;; %% Terminal Support
(load "tpu-recall" t)
;; Uncomment this line to set scroll margins 10% (top) and 15% (bottom).
-;(tpu-set-scroll-margins "10%" "15%")
+;(and (fboundp 'tpu-set-scroll-margins) (tpu-set-scroll-margins "10%" "15%"))
;; Load the vtxxx terminal control functions, but don't complain if
;; if the file is not found.
;; 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.
-(setq inhibit-local-variables t)
+(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).