(bat-generic-mode): "::"-style comments don't
[bpt/emacs.git] / lisp / tpu-doc.el
index dfdb6b8..ef724ec 100644 (file)
@@ -1,30 +1,26 @@
 ;;; 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.
+
+;; GNU Emacs is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 2, or (at your option)
+;; any later version.
 
 ;; GNU Emacs is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY.  No author or distributor
-;; accepts responsibility to anyone for the consequences of using it
-;; or for whether it serves any particular purpose or works at all,
-;; unless he says so in writing.  Refer to the GNU Emacs General Public
-;; License for full details.
-
-;; Everyone is granted permission to copy, modify and redistribute
-;; GNU Emacs, but only under the conditions described in the
-;; GNU Emacs General Public License.   A copy of this license is
-;; supposed to have been given to you along with GNU Emacs so you
-;; can know your rights and responsibilities.  It should be in a
-;; file named COPYING.  Among other things, the copyright notice
-;; and this notice must be preserved on all copies.
-;;
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
 
-;;; 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.")
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs; see the file COPYING.  If not, write to
+;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
 
 ;; This is documentation for the TPU-edt editor for GNU emacs.  Major
 
 ;; %% 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).