diff lisp/flow-ctrl.el @ 793:6fb68a1460a6

*** empty log message ***
author Eric S. Raymond <esr@snark.thyrsus.com>
date Thu, 16 Jul 1992 07:28:05 +0000
parents 45d748a65f24
children e694e0879463
line wrap: on
line diff
--- a/lisp/flow-ctrl.el	Thu Jul 16 06:28:10 1992 +0000
+++ b/lisp/flow-ctrl.el	Thu Jul 16 07:28:05 1992 +0000
@@ -1,8 +1,12 @@
-;;; flow-ctrl.el --- help for lusers on cu(1) or terminals with wired-in ^S/^Q flow control
+;;; flow-ctrl.el --- help for lusers on cu(1) or ttys with wired-in ^S/^Q flow control
+
+;; Author Kevin Gallagher
+;; Maintainer: FSF
+;; Last-Modified: 03 Jun 1992
+;; Adapted-By: ESR
 
 ;;; Copyright (C) 1990 Free Software Foundation, Inc.
 ;;; Copyright (C) 1991 Kevin Gallagher
-;;; Adapted for Emacs 19 by Eric S. Raymond <eric@snark.thyrsus.com>
 ;;;
 ;;; GNU Emacs is distributed in the hope that it will be useful, but
 ;;; WITHOUT ANY WARRANTY.  No author or distributor accepts
@@ -18,7 +22,8 @@
 ;;; 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.
-;;;
+
+;;; Commentary:
 
 ;;;; Terminals that use XON/XOFF flow control can cause problems with
 ;;;; GNU Emacs users.  This file contains Emacs Lisp code that makes it
@@ -36,6 +41,8 @@
 ;;; Portability note: This uses (getenv "TERM"), and therefore probably
 ;;; won't work outside of UNIX-like environments.
 
+;;; Code:
+
 (defun evade-flow-control ()
   "Enable use of flow control; let user type C-s as C-\ and C-q as C-^."
   (interactive)