Add standard library headers.

14 files changed, 52 insertions, 22 deletions

diff --git a/lisp/delsel.el b/lisp/delsel.el
index 29489be8040..0c07d0783d1 100644
--- a/lisp/delsel.el
+++ b/lisp/delsel.el
@@ -1,7 +1,10 @@
-;;; Pending delete selection
+;;; pending-del.el --- pending delete selection
+
 ;;; Copyright (C) 1992 Free Software Foundation, Inc.
-;;; Created: 14 Jul 92, Matthieu Devin <devin@lucid.com>
-;;; Last change  18-Feb-93, devin.
+
+;; Author: Matthieu Devin <devin@lucid.com>
+;; Created: 14 Jul 92
+;; Last change  18-Feb-93, devin.
 
 ;;; This file is part of GNU Emacs.
 
@@ -19,11 +22,14 @@
 ;;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;;; Commentary:
 
-;;; This files makes the active region be pending delete, meaning that
+;;; This file makes the active region be pending delete, meaning that
 ;;; text inserted while the region is active will replace the region contents.
 ;;; This is a popular behavior of personal computers text editors.
 
+;;; Code:
+
 (defvar pending-delete-mode t
   "*Non-nil means Pending Delete mode is enabled.
 In Pending Delete mode, when a region is highlighted,
@@ -110,4 +116,4 @@ In Transient Mark mode, if the mark is active, just deactivate it."
 
 (provide 'pending-del)
 
-;; End of pending-del.el.
+;;; pending-del.el ends here
diff --git a/lisp/emacs-lisp/lmenu.el b/lisp/emacs-lisp/lmenu.el
index 0e7e331acb9..8d41d541ff6 100644
--- a/lisp/emacs-lisp/lmenu.el
+++ b/lisp/emacs-lisp/lmenu.el
@@ -1,5 +1,7 @@
 ;;; lmenu.el --- emulate Lucid's menubar support
 
+;; Keywords: emulations
+
 ;; Copyright (C) 1992, 1993 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
diff --git a/lisp/emacs-lisp/profile.el b/lisp/emacs-lisp/profile.el
index cb2a2bc3a99..119ffb7b585 100644
--- a/lisp/emacs-lisp/profile.el
+++ b/lisp/emacs-lisp/profile.el
@@ -1,4 +1,4 @@
-;;; profile.el -- generate run time measurements of Emacs Lisp functions
+;;; profile.el --- generate run time measurements of Emacs Lisp functions
 
 ;; Copyright (C) 1992 Free Software Foundation, Inc.
 
@@ -356,4 +356,4 @@ DEF is (symbol-function FUN) ."
     (interactive)
     (process-send-string profile-timer-process "q\n"))
 
-;; profile.el ends here
+;;; profile.el ends here
diff --git a/lisp/hippie-exp.el b/lisp/hippie-exp.el
index 0080136c8e4..f9c3ba20b23 100644
--- a/lisp/hippie-exp.el
+++ b/lisp/hippie-exp.el
@@ -23,7 +23,7 @@
 ;; 
 ;;  Last change: 4 January 1993
 
-;; Commentary:
+;;; Commentary:
 ;;  
 ;;  `hippie-expand' is a single function for a lot of different kinds
 ;;  of completions and expansions.  Called repeatedly it tries all
@@ -125,7 +125,7 @@
 ;;  how to improve it.
 ;;
 
-;; Code:
+;;; Code:
 
 (defvar he-num -1)
 
diff --git a/lisp/isearch.el b/lisp/isearch.el
index 9605dae20f4..886bbd9c837 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -1,10 +1,10 @@
-;;; isearch.el ---- incremental search minor mode.
+;;; isearch.el --- incremental search minor mode.
 
 ;; Copyright (C) 1992 Free Software Foundation, Inc.
 
 ;; Author: Daniel LaLiberte <liberte@cs.uiuc.edu>
 
-;; |$Date: 1993/03/17 15:58:09 $|$Revision: 1.24 $
+;; |$Date: 1993/03/17 16:44:50 $|$Revision: 1.25 $
 
 ;; This file is not yet part of GNU Emacs, but it is based almost
 ;; entirely on isearch.el which is part of GNU Emacs.
@@ -92,8 +92,11 @@
 ;;;====================================================================
 ;;; Change History
 
-;;; $Header: /gd/gnu/emacs/19.0/lisp/RCS/isearch.el,v 1.24 1993/03/17 15:58:09 eric Exp eric $
+;;; $Header: /gd/gnu/emacs/19.0/lisp/RCS/isearch.el,v 1.25 1993/03/17 16:44:50 eric Exp eric $
 ;;; $Log: isearch.el,v $
+; Revision 1.25  1993/03/17  16:44:50  eric
+; Add standard library headers.
+;
 ; Revision 1.24  1993/03/17  15:58:09  eric
 ; Add standard library headers.
 ;
diff --git a/lisp/ls-lisp.el b/lisp/ls-lisp.el
index 94b0ed4385e..54da7fdc438 100644
--- a/lisp/ls-lisp.el
+++ b/lisp/ls-lisp.el
@@ -1,4 +1,7 @@
-;;;; directory.el - emulate insert-directory completely in Emacs Lisp
+;;; ls-lisp.el --- emulate insert-directory completely in Emacs Lisp
+
+;; Author: Sebastian Kremer <sk@thp.uni-koeln.de>
+;; Keywords: unix
 
 ;; Copyright (C) 1992 by Sebastian Kremer <sk@thp.uni-koeln.de>
 
@@ -45,6 +48,8 @@
 
 ;; Recognize some more ls switches: R F
 
+;;; Code:
+
 (defun insert-directory (file &optional switches wildcard full-directory-p)
   "Insert directory listing for of FILE, formatted according to SWITCHES.
 Leaves point after the inserted text.
@@ -227,4 +232,4 @@ The switches that work are: A a c i r S s t u"
 
 (provide 'ls-lisp)
 
-; eof
+;;; ls-lisp.el ends here
diff --git a/lisp/mail/rmailmsc.el b/lisp/mail/rmailmsc.el
index c4407383968..0f850708639 100644
--- a/lisp/mail/rmailmsc.el
+++ b/lisp/mail/rmailmsc.el
@@ -21,6 +21,7 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;;; Code:
 
 (defun set-rmail-inbox-list (file-name)
   "Set the inbox list of the current RMAIL file to FILE-NAME.
diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index 31aefc63174..bccfc9eb8f4 100644
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -1,4 +1,4 @@
-;; rmailsum.el --- make summary buffers for the mail reader
+;;; rmailsum.el --- make summary buffers for the mail reader
 
 ;; Copyright (C) 1985, 1993 Free Software Foundation, Inc.
 
diff --git a/lisp/mail/unrmail.el b/lisp/mail/unrmail.el
index b77b445d88f..0850d4be05e 100644
--- a/lisp/mail/unrmail.el
+++ b/lisp/mail/unrmail.el
@@ -1,4 +1,5 @@
 ;;; unrmail.el --- convert Rmail files to mailbox files.
+
 ;;; Copyright (C) 1992 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -17,6 +18,8 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;;; Code:
+
 (defvar command-line-args-left) ;Avoid 'free variable' warning
 
 ;;;###autoload
@@ -47,3 +50,5 @@ For example, invoke `emacs -batch -f batch-unrmail RMAIL'."
     (rmail-show-message 1)
     (while (not (rmail-output to-file))
       (setq message-count (1+ message-count)))))
+
+;;; unrmail.el ends here
diff --git a/lisp/play/meese.el b/lisp/play/meese.el
index 3159bf6faef..9deb1b69b9c 100644
--- a/lisp/play/meese.el
+++ b/lisp/play/meese.el
@@ -1,4 +1,5 @@
-;; meese.el --- protect the impressionable young minds of America
+;;; meese.el --- protect the impressionable young minds of America
+
 ;; This is in the public domain on account of being distributed since
 ;; 1985 or 1986 without a copyright notice.
 
diff --git a/lisp/rlogin.el b/lisp/rlogin.el
index 1059dec7836..1f4e8024d25 100644
--- a/lisp/rlogin.el
+++ b/lisp/rlogin.el
@@ -1,5 +1,8 @@
-;;; rlogin.el -- emacs interface using comint routines from CMU
-;;;
+;;; rlogin.el --- remote login interface
+
+;; Maintainer: Noah Friedman <friedman@prep.ai.mit.edu>
+;; Keywords: unix
+
 ;;; Copyright (C) 1992 Free Software Foundation, Inc.
 ;;;
 ;;; This program is free software; you can redistribute it and/or modify
@@ -20,10 +23,11 @@
 ;;;              675 Massachusetts Avenue.
 ;;;              Cambridge, MA 02139, USA. 
 ;;;
-;;; Please send bug reports, etc. to friedman@prep.ai.mit.edu
 
 ;;; Todo: add directory tracking using ange-ftp style patchnames for the cwd.
 
+;;; Code:
+
 (require 'comint)
 
 (defvar rlogin-program "rlogin"
@@ -108,4 +112,5 @@ buffer."
       (send-string nil "\C-d")
     (delete-char arg)))
 
-;; eof
+;;; rlogin.el ends here
+
diff --git a/lisp/scroll-bar.el b/lisp/scroll-bar.el
index 653537c7140..a924295faaa 100644
--- a/lisp/scroll-bar.el
+++ b/lisp/scroll-bar.el
@@ -21,6 +21,8 @@
 ;;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;;; Code:
+
 (require 'mouse)
 
 
diff --git a/lisp/textmodes/texinfmt.el b/lisp/textmodes/texinfmt.el
index 45580762b5a..55c606090e8 100644
--- a/lisp/textmodes/texinfmt.el
+++ b/lisp/textmodes/texinfmt.el
@@ -1,4 +1,4 @@
-;;;; texinfmt.el --- convert Texinfo files to Info files.
+;;; texinfmt.el --- convert Texinfo files to Info files.
 
 ;; Copyright (C) 1985, 1986, 1988, 1990 Free Software Foundation, Inc.
 
diff --git a/lisp/textmodes/texinfo.el b/lisp/textmodes/texinfo.el
index 0427b5582a8..5f502fb85d5 100644
--- a/lisp/textmodes/texinfo.el
+++ b/lisp/textmodes/texinfo.el
@@ -1,4 +1,4 @@
-;;;; texinfo.el ---- major mode for editing Texinfo files.
+;;; texinfo.el --- major mode for editing Texinfo files.
 
 ;; Copyright (C) 1985, 1988, 1989, 1990 Free Software Foundation, Inc.