From 1a06eabd17a8eff0635bc7058349f7c22057864c Mon Sep 17 00:00:00 2001
From: "Eric S. Raymond" <esr@snark.thyrsus.com>
Date: Sat, 30 May 1992 23:12:08 +0000
Subject: [PATCH] *** empty log message ***

---
 lisp/calendar/holidays.el        | 4 +++-
 lisp/emacs-lisp/float.el         | 5 +++--
 lisp/emacs-lisp/helper.el        | 7 ++++---
 lisp/emulation/edt.el            | 4 ++++
 lisp/flow-ctrl.el                | 7 +++----
 lisp/ftp.el                      | 5 ++++-
 lisp/gnus.el                     | 5 ++++-
 lisp/gnusmail.el                 | 5 ++++-
 lisp/gnusmisc.el                 | 5 ++++-
 lisp/gnuspost.el                 | 5 ++++-
 lisp/gosmacs.el                  | 5 ++++-
 lisp/grow-vers.el                | 4 ++++
 lisp/help.el                     | 5 ++++-
 lisp/hexl.el                     | 6 +++---
 lisp/inc-vers.el                 | 5 ++++-
 lisp/indent.el                   | 5 ++++-
 lisp/info.el                     | 4 +++-
 lisp/informat.el                 | 5 ++++-
 lisp/international/iso-ascii.el  | 5 ++++-
 lisp/international/iso-insert.el | 5 ++++-
 lisp/international/iso-swed.el   | 5 ++++-
 lisp/isearch-old.el              | 5 ++++-
 lisp/kermit.el                   | 5 +++--
 lisp/play/gomoku.el              | 5 +++--
 lisp/play/hanoi.el               | 6 ++----
 lisp/progmodes/fortran.el        | 4 +++-
 lisp/progmodes/hideif.el         | 7 ++++---
 lisp/progmodes/icon.el           | 3 +++
 lisp/textmodes/ispell4.el        | 6 ++++--
 29 files changed, 105 insertions(+), 42 deletions(-)

diff --git a/lisp/calendar/holidays.el b/lisp/calendar/holidays.el
index ccc99f55eb2..437be3c5aba 100644
--- a/lisp/calendar/holidays.el
+++ b/lisp/calendar/holidays.el
@@ -1,4 +1,5 @@
-;; Holiday functions.
+;;; holidays.el --- holiday functions for the calendar package
+
 ;; Copyright (C) 1989, 1990, 1991 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -586,3 +587,4 @@ checked.  If nil, the holiday (car (cdr (cdr X))), if there, is checked."
 
 (provide 'holidays)
 
+;;; holidays.el ends here
diff --git a/lisp/emacs-lisp/float.el b/lisp/emacs-lisp/float.el
index 3c2921c506f..d01ba1e291d 100644
--- a/lisp/emacs-lisp/float.el
+++ b/lisp/emacs-lisp/float.el
@@ -1,3 +1,5 @@
+;;; float.el --- floating point arithmetic package.
+
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 ;; Author Bill Rosenblatt
 
@@ -17,8 +19,6 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
-;; Floating point arithmetic package.
-;;
 ;; Floating point numbers are represented by dot-pairs (mant . exp)
 ;; where mant is the 24-bit signed integral mantissa and exp is the
 ;; base 2 exponent.
@@ -447,3 +447,4 @@ are recognized."
 
 (provide 'float)
 
+;;; float.el ends here
diff --git a/lisp/emacs-lisp/helper.el b/lisp/emacs-lisp/helper.el
index 0064bc66e07..e3565856f56 100644
--- a/lisp/emacs-lisp/helper.el
+++ b/lisp/emacs-lisp/helper.el
@@ -1,5 +1,4 @@
-;; helper - utility help package for modes which want to provide help
-;; without relinquishing control, e.g. `electric' modes.
+;;; helper.el --- utility help package supporting help in electric modes
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 ;; Principal author K. Shane Hartman
@@ -147,4 +146,6 @@
 	     (ding)
 	     (setq continue nil))))))
 
-(provide 'helper)			
\ No newline at end of file
+(provide 'helper)
+
+;;; helper.el ends here
diff --git a/lisp/emulation/edt.el b/lisp/emulation/edt.el
index be7c051e82a..8d60eeeb347 100644
--- a/lisp/emulation/edt.el
+++ b/lisp/emulation/edt.el
@@ -1,3 +1,5 @@
+;;; edt.el --- EDT emulation in Emacs
+
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 ;;  It started from public domain code by Mike Clarkson
 ;;  but has been greatly altered.
@@ -396,3 +398,5 @@ by the PF1 key.  GOLD is the ASCII the 7-bit escape sequence <ESC>OP.")
 (or (assq 'edt-direction-string minor-mode-alist)
     (setq minor-mode-alist (cons '(edt-direction-string edt-direction-string)
 				 minor-mode-alist)))
+
+;;; edt.el ends here
diff --git a/lisp/flow-ctrl.el b/lisp/flow-ctrl.el
index bcd2c152b4f..68d5165dc45 100644
--- a/lisp/flow-ctrl.el
+++ b/lisp/flow-ctrl.el
@@ -1,5 +1,5 @@
-;;; 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 terminals with wired-in ^S/^Q flow control
+
 ;;; Copyright (C) 1990 Free Software Foundation, Inc.
 ;;; Copyright (C) 1991 Kevin Gallagher
 ;;; Adapted for Emacs 19 by Eric S. Raymond <eric@snark.thyrsus.com>
@@ -80,7 +80,6 @@ and C-q characters to OS."
     (and (memstr= term losing-terminal-types) (evade-flow-control)))
   )
 
-;;; flow-ctrl.el ends here
-
 (provide 'flow-ctrl)
 
+;;; flow-ctrl.el ends here
diff --git a/lisp/ftp.el b/lisp/ftp.el
index 44655357ac3..45e15941245 100644
--- a/lisp/ftp.el
+++ b/lisp/ftp.el
@@ -1,4 +1,5 @@
-;; File input and output over Internet using FTP
+;;; ftp.el --- file input and output over Internet using FTP
+
 ;; Copyright (C) 1987 Free Software Foundation, Inc.
 ;; Author mly@prep.ai.mit.edu.
 
@@ -384,3 +385,5 @@ USER and PASSWORD are defaulted from the values used when
 	 (= (process-exit-status process) 0)
 	 (set-buffer-modified-p nil))
     (message "Reverted")))
+
+;;; ftp.el ends here
diff --git a/lisp/gnus.el b/lisp/gnus.el
index 977b0444f08..98d8c7f54d2 100644
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -1,4 +1,5 @@
-;;; GNUS: an NNTP-based News Reader for GNU Emacs
+;;; gnus.el --- GNUS: an NNTP-based News Reader for GNU Emacs
+
 ;; Copyright (C) 1987, 1988, 1989 Fujitsu Laboratories LTD.
 ;; Copyright (C) 1987, 1988, 1989, 1990 Masanobu UMEDA
 ;; $Header: gnus.el,v 3.13 90/03/23 13:24:27 umerin Locked $
@@ -6080,3 +6081,5 @@ Range of OBJ is expressed as `((beg1 . end1) (beg2 . end2) ...)."
 ;;end:
 
 (provide 'gnus)
+
+;;; gnus.el ends here
diff --git a/lisp/gnusmail.el b/lisp/gnusmail.el
index ad09ee98197..8ac0b06f02a 100644
--- a/lisp/gnusmail.el
+++ b/lisp/gnusmail.el
@@ -1,4 +1,5 @@
-;;; Mail reply commands for GNUS newsreader
+;;; gnusmail.el --- mail reply commands for GNUS newsreader
+
 ;; Copyright (C) 1990 Masanobu UMEDA
 ;; $Header: gnusmail.el,v 1.1 90/03/23 13:24:39 umerin Locked $
 
@@ -147,3 +148,5 @@ The command \\[mh-yank-cur-msg] yanks the original message into current buffer."
     (setq mh-sent-from-msg 1)))
 
 (provide 'gnusmail)
+
+;;; gnusmail.el ends here
diff --git a/lisp/gnusmisc.el b/lisp/gnusmisc.el
index 17238369da0..7518571ee07 100644
--- a/lisp/gnusmisc.el
+++ b/lisp/gnusmisc.el
@@ -1,4 +1,5 @@
-;;; Miscellaneous commands for GNUS newsreader
+;;; gnusmisc.el --- miscellaneous commands for GNUS newsreader
+
 ;; Copyright (C) 1989 Fujitsu Laboratories LTD.
 ;; Copyright (C) 1989, 1990 Masanobu UMEDA
 ;; $Header: gnusmisc.el,v 1.2 90/03/23 13:25:04 umerin Locked $
@@ -213,3 +214,5 @@ inserting it before the newsgroup on the line containging point."
     ))
 
 (provide 'gnusmisc)
+
+;;; gnusmisc.el ends here
diff --git a/lisp/gnuspost.el b/lisp/gnuspost.el
index 9538aeaea91..f13eb9bdf92 100644
--- a/lisp/gnuspost.el
+++ b/lisp/gnuspost.el
@@ -1,4 +1,5 @@
-;;; Post news commands for GNUS newsreader
+;;; gnuspost.el --- post news commands for GNUS newsreader
+
 ;; Copyright (C) 1989 Fujitsu Laboratories LTD.
 ;; Copyright (C) 1989, 1990 Masanobu UMEDA
 ;; $Header: gnuspost.el,v 1.2 90/03/23 13:25:16 umerin Locked $
@@ -671,3 +672,5 @@ containing the organization."
     ))
 
 (provide 'gnuspost)
+
+;;; gnuspost.el ends here
diff --git a/lisp/gosmacs.el b/lisp/gosmacs.el
index 1f227abe364..7246959f3a5 100644
--- a/lisp/gosmacs.el
+++ b/lisp/gosmacs.el
@@ -1,4 +1,5 @@
-;; Rebindings to imitate Gosmacs.
+;;; gosmacs.el --- rebindings to imitate Gosmacs.
+
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -101,3 +102,5 @@ From the window at the lower right corner, select the one at the upper left."
   "Scroll the selected window up so that the current line is at the top."
   (interactive)
   (recenter 0))
+
+;;; gosmacs.el ends here
diff --git a/lisp/grow-vers.el b/lisp/grow-vers.el
index bf55146c6a6..7e34961faaa 100644
--- a/lisp/grow-vers.el
+++ b/lisp/grow-vers.el
@@ -1,3 +1,5 @@
+;;; grow-vers.el --- increment Emacs version number
+
 ;; Load this file to add a new level (starting at zero)
 ;; to the Emacs version number recorded in version.el.
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
@@ -28,3 +30,5 @@
 ;; so that we do not alter the current version.
 (delete-file "lisp/version.el")
 (write-region (point-min) (point-max) "lisp/version.el" nil 'nomsg)
+
+;;; grow-vers.el ends here
diff --git a/lisp/help.el b/lisp/help.el
index bc71ffa2084..48e34665732 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -1,4 +1,5 @@
-;; Help commands for Emacs
+;;; help.el --- help commands for Emacs
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -383,3 +384,5 @@ to the specified name LIBRARY (a la calling `load' instead of `load-library')."
      load-path)
     (message "No library %s in search path" library)
     nil))
+
+;;; help.el ends here
diff --git a/lisp/hexl.el b/lisp/hexl.el
index 8671413e81a..b736f28fa40 100644
--- a/lisp/hexl.el
+++ b/lisp/hexl.el
@@ -1,5 +1,5 @@
-;; -*-Emacs-Lisp-*-
-;; hexl-mode -- Edit a file in a hex dump format.
+;;; hexl-mode.el --- edit a file in a hex dump format.
+
 ;; Copyright (C) 1989 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -656,4 +656,4 @@ You may also type up to 3 octal digits, to insert a character with that code"
     (define-key hexl-mode-map "\C-x\C-s" 'hexl-save-buffer)
     (define-key hexl-mode-map "\C-x\C-t" 'undefined))
 
-;; The End.
+;;; hexl.el ends here
diff --git a/lisp/inc-vers.el b/lisp/inc-vers.el
index 13a4fb17e80..1eed7b35940 100644
--- a/lisp/inc-vers.el
+++ b/lisp/inc-vers.el
@@ -1,4 +1,5 @@
-;; Load this file to increment the recorded Emacs version number.
+;;; inc-vers.el --- load this to increment the recorded Emacs version number.
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -41,3 +42,5 @@
 (set-buffer-modified-p nil)
 
 (kill-emacs)
+
+;;; inc-vers.el ends here
diff --git a/lisp/indent.el b/lisp/indent.el
index 781a1897dd7..76f16ac4555 100644
--- a/lisp/indent.el
+++ b/lisp/indent.el
@@ -1,4 +1,5 @@
-;; Indentation commands for Emacs
+;;; indent.el --- indentation commands for Emacs
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -244,3 +245,5 @@ Use \\[edit-tab-stops] to edit them interactively."
 (define-key esc-map "\034" 'indent-region)
 (define-key ctl-x-map "\t" 'indent-rigidly)
 (define-key esc-map "i" 'tab-to-tab-stop)
+
+;;; indent.el ends here
diff --git a/lisp/info.el b/lisp/info.el
index 8ab04955db9..772fa26ebf1 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1,4 +1,5 @@
-;; Info package for Emacs  -- could use a "create node" feature.
+;;; info.el --- info package for Emacs  -- could use a "create node" feature.
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -995,3 +996,4 @@ Interactively, if the binding is execute-extended-command, a command is read."
 
 (provide 'info)
 
+;;; info.el ends here
diff --git a/lisp/informat.el b/lisp/informat.el
index 1f91cb5b8be..939b1cbb632 100644
--- a/lisp/informat.el
+++ b/lisp/informat.el
@@ -1,4 +1,5 @@
-;; Info support functions package for Emacs
+;;; informat.el --- info support functions package for Emacs
+
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -413,3 +414,5 @@ For example, invoke \"emacs -batch -f batch-info-validate $info/ ~/*.info\""
 			   (save-buffer))))
 	    (error (message ">> Error: %s" (prin1-to-string err))))))
       (kill-emacs error))))
+
+;;; informat.el ends here
diff --git a/lisp/international/iso-ascii.el b/lisp/international/iso-ascii.el
index 13aeaaa8c76..b90d5aa47c0 100644
--- a/lisp/international/iso-ascii.el
+++ b/lisp/international/iso-ascii.el
@@ -1,4 +1,5 @@
-;; Set up char tables for ISO 8859/1 character set for ASCII terminals.
+;;; iso-ascii.el --- set up char tables for ISO 8859/1 character set for ASCII terminals.
+
 ;; Copyright (C) 1987 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -124,3 +125,5 @@
 (standard-display-ascii 255 "{\"y}") ; small y with diaeresis or umlaut mark
 
 (provide 'iso8859-1-ascii)
+
+;;; iso-ascii.el ends here
diff --git a/lisp/international/iso-insert.el b/lisp/international/iso-insert.el
index 3ea2e8530e8..84f19858735 100644
--- a/lisp/international/iso-insert.el
+++ b/lisp/international/iso-insert.el
@@ -1,4 +1,5 @@
-;; Insert functions for ISO 8859/1.
+;;; iso-insert.el --- insert functions for ISO 8859/1.
+
 ;; Copyright (C) 1987 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -618,3 +619,5 @@
 )
 
 (provide 'iso8859-1-insert)
+
+;;; iso-insert.el ends here
diff --git a/lisp/international/iso-swed.el b/lisp/international/iso-swed.el
index 9ab2134381a..0e8caf49ed0 100644
--- a/lisp/international/iso-swed.el
+++ b/lisp/international/iso-swed.el
@@ -1,4 +1,5 @@
-;; Set up char tables for ISO 8859/1 for Swedish/Finnish terminals.
+;;; iso-swed.el --- set up char tables for ISO 8859/1 for Swedish/Finnish terminals.
+
 ;; Copyright (C) 1987 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -138,3 +139,5 @@
 (standard-display-ascii 255 "{\"y}") ; small y with diaeresis or umlaut mark
 
 (provide 'iso8859-1-swedish)
+
+;;; iso-swed.el ends here
diff --git a/lisp/isearch-old.el b/lisp/isearch-old.el
index 57e04fc3956..68dc943a73a 100644
--- a/lisp/isearch-old.el
+++ b/lisp/isearch-old.el
@@ -1,4 +1,5 @@
-;; Incremental search
+;;; isearch.el --- incremental search commands
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -621,3 +622,5 @@ is treated as a regexp.  See \\[isearch-forward] for more info."
     (setq command-history (cons (list function string) command-history))
     ;; Go ahead and search.
     (funcall function string)))
+
+;;; isearch.el ends here
diff --git a/lisp/kermit.el b/lisp/kermit.el
index a66165b9671..dfbd82561d5 100644
--- a/lisp/kermit.el
+++ b/lisp/kermit.el
@@ -1,4 +1,5 @@
-;;Additions to shell mode for use with kermit, etc.
+;;; kermit.el --- additions to shell mode for use with kermit, etc.
+
 ;;Feb 1988, Jeff Norden - jeff@colgate.csnet
 ;; Copyright (C) 1988 Free Software Foundation, Inc.
 
@@ -136,4 +137,4 @@ command \"kermit | tr -d '\\015'\"."
   (interactive)
   (set-process-filter (get-buffer-process (current-buffer)) nil))
 
-
+;;; kermit.el ends here
diff --git a/lisp/play/gomoku.el b/lisp/play/gomoku.el
index a3783e63c5e..b3696b50b33 100644
--- a/lisp/play/gomoku.el
+++ b/lisp/play/gomoku.el
@@ -1,4 +1,5 @@
-;; Gomoku game between you and Emacs
+;;; gomoku.el --- Gomoku game between you and Emacs
+
 ;; Copyright (C) 1988 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -1157,4 +1158,4 @@ If the game is finished, this command requests for another game."
 
 (provide 'gomoku)
 
-
+;;; gomoku.el ends here
diff --git a/lisp/play/hanoi.el b/lisp/play/hanoi.el
index 425f98f5191..814656b0d7a 100644
--- a/lisp/play/hanoi.el
+++ b/lisp/play/hanoi.el
@@ -1,8 +1,6 @@
-;
-; hanoi - towers of hanoi in GNUmacs
-;
+;;; hanoi.el --- towers of hanoi in GNUmacs
+
 ; Author (a) 1985, Damon Anton Permezel
-;
 
 ;;;
 ;;; hanoi-topos - direct cursor addressing
diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el
index 6ed3645ec9e..aad14d232c2 100644
--- a/lisp/progmodes/fortran.el
+++ b/lisp/progmodes/fortran.el
@@ -1,4 +1,5 @@
-;;; Fortran mode for GNU Emacs  (version 1.28.3, July 15, 1991)
+;;; fortran.el --- Fortran mode for GNU Emacs  (version 1.28.3, July 15, 1991)
+
 ;;; Copyright (c) 1991 Free Software Foundation, Inc.
 ;;; Written by Michael D. Prange (prange@erl.mit.edu)
 ;;; Maintained (as of version 1.28) by Stephen A. Wood (saw@hallc1.cebaf.gov)
@@ -995,3 +996,4 @@ character format style."
 
 (provide 'fortran)
 
+;;; fortran.el ends here
diff --git a/lisp/progmodes/hideif.el b/lisp/progmodes/hideif.el
index 4a1b9897808..a43b91ce091 100644
--- a/lisp/progmodes/hideif.el
+++ b/lisp/progmodes/hideif.el
@@ -1,5 +1,5 @@
-;;; hide-ifdef-mode.el   Hides selected code within ifdef.
-;;;
+;;; hide-ifdef-mode.el --- ides selected code within ifdef.
+
 ;;; Copyright (C) 1988 Brian Marick and Daniel LaLiberte
 ;;; Written by Brian Marick, at Gould, Computer Systems Division, Urbana IL.
 ;;; Extensively modified by Daniel LaLiberte (while at Gould).
@@ -1004,4 +1004,5 @@ Turn off hiding by calling show-ifdef."
       (error "No define list for %s" name))
     (if hide-ifdef-hiding (hide-ifdefs))))
 
-;===%%SF%% exports (End)  ===
+;;; hideif.el ends here
+
diff --git a/lisp/progmodes/icon.el b/lisp/progmodes/icon.el
index c381f812105..cab251427ba 100644
--- a/lisp/progmodes/icon.el
+++ b/lisp/progmodes/icon.el
@@ -1,3 +1,5 @@
+;;; icon.el --- mode for editing Icon code
+
 ;; Note: use
 ;;  (autoload 'icon-mode "icon" nil t)
 ;;  (setq auto-mode-alist (cons '("\\.icn$" . icon-mode) auto-mode-alist))
@@ -547,3 +549,4 @@ Returns nil if line starts inside a string, t if in a comment."
 		(if (re-search-forward comment-start-skip (save-excursion (end-of-line) (point)) t)
 		    (progn (indent-for-comment) (beginning-of-line))))))))))
 
+;;; icon.el ends here
diff --git a/lisp/textmodes/ispell4.el b/lisp/textmodes/ispell4.el
index ca9b4af48ab..d0f653682f7 100644
--- a/lisp/textmodes/ispell4.el
+++ b/lisp/textmodes/ispell4.el
@@ -1,5 +1,6 @@
-;;This is the GNU EMACS interface to GNU ISPELL version 3.
-;;   Copyright (C) 1990, 1991 Free Software Foundation, Inc.
+;;; ispell.el --- this is the GNU EMACS interface to GNU ISPELL version 3.
+
+;;Copyright (C) 1990, 1991 Free Software Foundation, Inc.
 ;;
 ;;This file is part of GNU ISPELL.
 ;;
@@ -547,3 +548,4 @@ L lookup; Q quit\n")
       (kill-emacs 1))
   (write-region (point-min) (point-max) "ispell.info"))
 
+;;; ispell.el ends here
-- 
2.11.4.GIT