*** empty log message ***

9 files changed, 60 insertions, 4 deletions

diff --git a/lisp/play/spook.el b/lisp/play/spook.el
index 890441f4aa2..98b22fc2086 100644
--- a/lisp/play/spook.el
+++ b/lisp/play/spook.el
@@ -1,5 +1,8 @@
 ;;; spook.el --- spook phrase utility for overloading the NSA line eater
 
+;;; Maintainer: FSF
+;;; Last-modified: 05 Dec 1991
+
 ;; Copyright (C) 1988 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -18,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.
 
+;;; Commentary:
 
 ; Steve Strassmann (straz@media-lab.media.mit.edu) didn't write
 ; this, and even if he did, he really didn't mean for you to use it
@@ -36,6 +40,8 @@
 ;  give your message that extra bit of attractiveness for automated
 ;  keyword scanners.
 
+;;; Code:
+
 ; Variables
 (defvar spook-phrases-file (concat data-directory "spook.lines")
    "Keep your favorite phrases here.")
diff --git a/lisp/play/studly.el b/lisp/play/studly.el
index 6d97a31fef0..704efe908de 100644
--- a/lisp/play/studly.el
+++ b/lisp/play/studly.el
@@ -1,7 +1,12 @@
 ;;; studly.el --- StudlyCaps (tm)(r)(c)(xxx)
+
+;; Maintainer: FSF
+
 ;;; This is in the public domain, since it was distributed
 ;;; by its author without a copyright notice in 1986.
 
+;;; Code:
+
 (defun studlify-region (begin end)
   "Studlify-case the region"
   (interactive "*r")
diff --git a/lisp/server.el b/lisp/server.el
index 9273064a7c5..8aaa836b999 100644
--- a/lisp/server.el
+++ b/lisp/server.el
@@ -1,9 +1,12 @@
 ;;; server.el --- Lisp code for GNU Emacs running as server process.
 
-;; Copyright (C) 1986, 1987 Free Software Foundation, Inc.
-;; Author William Sommerfeld, wesommer@athena.mit.edu.
+;; Author: William Sommerfeld <wesommer@athena.mit.edu>
+;; Last-Modified: 5 Dec 1991
+
 ;; Changes by peck@sun.com and by rms.
 
+;; Copyright (C) 1986, 1987 Free Software Foundation, Inc.
+
 ;; This file is part of GNU Emacs.
 
 ;; GNU Emacs is free software; you can redistribute it and/or modify
@@ -20,6 +23,7 @@
 ;; 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 Lisp code is run in Emacs when it is to operate as
 ;;; a server for other processes.
@@ -66,6 +70,8 @@
 ;;; the clients who are waiting for this buffer to be edited.  
 ;;; The global variable "server-clients" lists all the waiting clients,
 ;;; and which files are yet to be edited for each.
+
+;;; Code:
 
 (defvar server-program "emacsserver"
   "*The program to use as the edit server")
diff --git a/lisp/shell.el b/lisp/shell.el
index 0473d364e4e..3279c1dfc81 100644
--- a/lisp/shell.el
+++ b/lisp/shell.el
@@ -1,5 +1,8 @@
 ;;; shell.el --- general command interpreter in a window stuff
 
+;; Author: Olin Shivers <shivers@cs.cmu.edu>
+;; Last-Modified: 16 Mar 1992
+
 ;;; Copyright Olin Shivers (1988).
 
 ;;; This file is part of GNU Emacs.
@@ -18,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.
 
+;;; Commentary:
+
 ;;; The changelog is at the end of file.
 
 ;;; Please send me bug reports, bug fixes, and extensions, so that I can
@@ -44,7 +49,6 @@
 ;;; Maybe I should ensure the process mark is in the window when I send
 ;;; text to the process? Switch selectable?
 
-(require 'comint)
 ;; YOUR .EMACS FILE
 ;;=============================================================================
 ;; Some suggestions for your .emacs file.
@@ -136,6 +140,10 @@
 ;;; ===========================================================================
 ;;; 
 
+;;; Code:
+
+(require 'comint)
+
 ;;;###autoload
 (defconst shell-prompt-pattern "^[^#$%>]*[#$%>] *"
   "Regexp to match prompts in the inferior shell.
diff --git a/lisp/startup.el b/lisp/startup.el
index 43d3e3c2eea..e8896ea01a9 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1,5 +1,8 @@
 ;;; startup.el --- process Emacs shell arguments
 
+;; Maintainer: FSF
+;; Last-Modified: 9 Jul 1992
+
 ;; Copyright (C) 1985, 1986, 1992 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -18,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.
 
+;;; Commentary:
 
 ; These are processed only at the beginning of the argument list.
 ; -batch		execute noninteractively (messages go to stdout,
@@ -48,6 +52,8 @@
 ; file			visit file
 ; -kill			kill (exit) emacs
 
+;;; Code:
+
 (setq top-level '(normal-top-level))
 
 (defvar command-line-processed nil "t once command line has been processed")
diff --git a/lisp/subr.el b/lisp/subr.el
index ecb119cccfc..9941fd7e322 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -1,4 +1,8 @@
 ;;; subr.el --- basic lisp subroutines for Emacs
+
+;; Maintainer: FSF
+;; Last-Modified: 12 Aug 1991
+
 ;;; Copyright (C) 1985, 1986, 1992 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -17,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 one-window-p (&optional nomini)
   "Returns non-nil if there is only one window.
@@ -351,3 +356,5 @@ and then modifies one entry in it."
 instead of having to write (function (lambda ...)) or '(lambda ...), the
 latter of which won't get byte-compiled."
   (` (function (lambda (,@ cdr)))))
+
+;;; subr.el ends here
diff --git a/lisp/superyank.el b/lisp/superyank.el
index 6c4f0a0ee86..9746b22a450 100644
--- a/lisp/superyank.el
+++ b/lisp/superyank.el
@@ -1,4 +1,11 @@
-;;; superyank.el --- smart message-yanking code for GNUS (Version 1.1)
+;;; superyank.el --- smart message-yanking code for GNUS
+
+;; Author: Barry A. Warsaw <warsaw@cme.nist.gov>
+;; Version: 1.1
+;; Last-Modified: 15 Jul 1992
+;; Adapted-By: ESR
+
+;;; Commentary:
 
 ;; Inserts the message being replied to with various user controlled
 ;; citation styles.
@@ -83,6 +90,9 @@
 ;; 2) reparse nested citations to try to recast as non-nested citations
 ;;    perhaps by checking the References: line
 ;;
+
+;;; Code:
+
 ;; ======================================================================
 ;;
 ;; require and provide features
diff --git a/lisp/textmodes/scribe.el b/lisp/textmodes/scribe.el
index 7cc1bc26057..d722989ebdf 100644
--- a/lisp/textmodes/scribe.el
+++ b/lisp/textmodes/scribe.el
@@ -1,5 +1,8 @@
 ;;; scribe.el --- scribe mode, and its idiosyncratic commands.
 
+;; Maintainer: FSF
+;; Last-Modified: 9 May 1991
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; This file might become part of GNU Emacs.
@@ -18,6 +21,7 @@
 ;; It should be in a file named COPYING.  Among other things, the
 ;; copyright notice and this notice must be preserved on all copies.
 
+;;; Code:
 
 (defvar scribe-mode-syntax-table nil
   "Syntax table used while in scribe mode.")
diff --git a/lisp/textmodes/spell.el b/lisp/textmodes/spell.el
index 85adb6b4154..63ef847b018 100644
--- a/lisp/textmodes/spell.el
+++ b/lisp/textmodes/spell.el
@@ -1,5 +1,8 @@
 ;;; spell.el --- spelling correction interface for Emacs.
 
+;; Maintainer: FSF
+;; Last-Modified: 9 May 1991
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -18,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:
 
 (defvar spell-command "spell"
   "*Command to run the spell program.")