*** empty log message ***

lisp/abbrev.el

@@ -1,12 +1,15 @@
 ;;; abbrev.el --- abbrev mode commands for Emacs
 
-;; Copyright (C) 1985-1991 Free Software Foundation, Inc.
+;; Maintainer: FSF
+;; Last-Modified: 09 Jul 1992
+
+;; Copyright (C) 1985, 1986, 1987, 1992 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 (defconst only-global-abbrevs nil "\
 *t means user plans to use global abbrevs only.
@@ -152,7 +156,7 @@ Does not print anything."
   (read-abbrev-file file t))
 
 (defun write-abbrev-file (file)
-  "Write all abbrev definitions to file of Lisp code.
+  "Write all abbrev definitions to a file of Lisp code.
 The file written can be loaded in another session to define the same abbrevs.
 The argument FILE is the file name to write."
   (interactive
@@ -160,7 +164,6 @@ The argument FILE is the file name to write."
     (read-file-name "Write abbrev file: "
 		    (file-name-directory (expand-file-name abbrev-file-name))
 		    abbrev-file-name)))
-  (interactive "FWrite abbrev file: ")
   (or (and file (> (length file) 0))
       (setq file abbrev-file-name))
   (save-excursion

lisp/abbrevlist.el

@@ -1,5 +1,8 @@
 ;;; abbrevlist.el --- list one abbrev table alphabetically ordered.
 
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
+
 ;; Copyright (C) 1986, 1992 Free Software Foundation, Inc.
 ;; Suggested by a previous version by Gildea.
 
@@ -7,7 +10,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,6 +22,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 list-one-abbrev-table (abbrev-table output-buffer)
   "Display alphabetical listing of ABBREV-TABLE in buffer OUTPUT-BUFFER."

lisp/ada.el

@@ -1,8 +1,8 @@
 ;;; ada.el --- Ada editing support package in GNUlisp.  v1.0
 
-; Author: Vincent Broman <broman@bugs.nosc.mil>  May 1987.
+;; Author: Vincent Broman <broman@bugs.nosc.mil>
-; (borrows heavily from Mick Jordan's Modula-2 package for GNU,
+;; Last-Modified: 30 Jan 1991
-; as modified by Peter Robinson, Michael Schmidt, and Tom Perrine.)
+;; Keywords: languages
 
 ;; Copyright (C) 1985, 1986, 1987 Free Software Foundation, Inc.
 
@@ -10,7 +10,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -22,6 +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:
+
+;; Created May 1987.
+;; (borrows heavily from Mick Jordan's Modula-2 package for GNU,
+;; as modified by Peter Robinson, Michael Schmidt, and Tom Perrine.)
+
+;;; Code:
+
 (setq auto-mode-alist (cons (cons "\\.ada$" 'ada-mode) auto-mode-alist))
 
 (defvar ada-mode-syntax-table nil

lisp/apropos.el

@@ -1,12 +1,15 @@
 ;;; apropos.el --- faster apropos commands.
 
+;; Author: Joe Wells <jbw@bigbird.bu.edu>
+;; Last-Modified: 5 May 1989
+
 ;; Copyright (C) 1989 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -18,10 +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.
 
-;; Author: Joe Wells
+;;; Commentary:
-;; Last changed: Fri May  5 18:08:16 1989 by jbw (Joseph Wells) on bucsf
-;; jbw%bucsf.bu.edu@bu-it.bu.edu (school year)
-;; joew@uswest.com (summer)
 
 ;; The ideas for this package were derived from the C code in
 ;; src/keymap.c and elsewhere.  The functions in this file should
@@ -43,6 +43,8 @@
 ;; Made doc file buffer read-only, buried it.
 ;; Only call substitute-command-keys if do-all set.
 
+;;; Code:
+
 (defvar apropos-do-all nil
   "*Whether `apropos' and `super-apropos' should do everything that they can.
 Makes them run 2 or 3 times slower.  Set this non-nil if you have a fast

lisp/array.el

@@ -1,8 +1,8 @@
 ;;; array.el --- array editing commands for Gnu Emacs
 
-;;;  Written by dmb%morgoth@harvard.harvard.edu (address is old)
+;; Author David M. Brown
-;;;   (David M. Brown at Goldberg-Zoino & Associates, Inc.)
+;; Maintainer: FSF
-;;;  Thanks to cph@kleph.ai.mit.edu for assistance
+;; Last-Modified: 30 Jan 1991
 
 ;; Copyright (C) 1987 Free Software Foundation, Inc.
 
@@ -10,7 +10,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -22,12 +22,19 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;;; Commentary:
+
+;;;  Written by dmb%morgoth@harvard.harvard.edu (address is old)
+;;;   (David M. Brown at Goldberg-Zoino & Associates, Inc.)
+;;;  Thanks to cph@kleph.ai.mit.edu for assistance
+
 ;;; To do:
 ;;;   Smooth initialization process by grokking local variables list
 ;;;     at end of buffer or parsing buffer using whitespace as delimiters.
 ;;;   Make 'array-copy-column-right faster.
 
 
+;;; Code:
 
 ;;; Internal information functions.
   

lisp/autoinsert.el

@@ -1,12 +1,16 @@
 ;;; autoinsert.el --- automatic mode-dependent insertion of text into new files
 
+;; Author: Charlie Martin <crm@cs.duke.edu>
+;; Created: 01 Jul 1988
+;; Last-Modified: 30 Jun 1992
+
 ;; Copyright (C) 1985, 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
 ;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 1, or (at your option)
+;; 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,
@@ -18,7 +22,7 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
-;;; autoinsert.el
+;;; Commentary:
 
 ;;;  Abstract:
 ;;;
@@ -49,6 +53,8 @@
 ;;;
 ;;;  Date: Fri Jul  1 16:15:31 EDT 1988
 
+;;; Code:
+
 (defvar auto-insert-alist '(("\\.tex$" . "tex-insert.tex")
 			    ("\\.c$" . "c-insert.c")
 			    ("\\.h$" . "h-insert.c")

lisp/calendar/appt.el

@@ -1,12 +1,17 @@
 ;;; appt.el --- appointment notification functions.
 
+;; Author: Neil Mager <neilm@juliet.ll.mit.edu>
+;; Version: 2.1
+;; Last-Modified: 14 Jul 1992
+;; Keywords: calendar
+
 ;; Copyright (C) 1989, 1990 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -18,12 +23,13 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;;; Commentary:
+
 ;;
 ;; appt.el - visible and/or audible notification of
 ;;           appointments from ~/diary file generated from
 ;;           Edward M. Reingold's calendar.el.
 ;;
-;; Version 2.1
 ;;
 ;; Comments, corrections, and improvements should be sent to
 ;; Neil M. Mager
@@ -99,6 +105,9 @@
 ;;; reads. This is all done automatically.
 ;;; It is invoked from the function list-diary-entries.
 ;;;
+
+;;; Code:
+
 (defvar appt-issue-message t
   "*Non-nil means check for appointments in the diary buffer.
 To be detected, the diary entry must have the time

lisp/case-table.el

@@ -1,4 +1,8 @@
-;;; case-table.el --- functions for extending the character set and dealing with case tables.
+;;; case-table.el ---code to extend the character set and support case tables.
+
+;; Author: Howard Gayle
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
 
 ;; Copyright (C) 1988 Free Software Foundation, Inc.
 
@@ -6,7 +10,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -18,6 +22,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:
 
 ;; Written by:
 ;; TN/ETX/TX/UMG Howard Gayle        UUCP : seismo!enea!erix!howard
@@ -26,6 +31,8 @@
 ;; S-126 25 Stockholm                FAX  : +46 8 719 64 82
 ;; Sweden
 
+;;; Code:
+
 (defun describe-buffer-case-table ()
   "Describe the case table of the current buffer."
   (interactive)

lisp/chistory.el

@@ -1,13 +1,16 @@
 ;;; chistory.el --- list command history
 
+;; Author: K. Shane Hartman
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
-;; Principal author K. Shane Hartman
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,12 +22,15 @@
 ;; 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 really has nothing to do with list-command-history per se, but
 ;; its a nice alternative to C-x ESC (repeat-complex-command) and
 ;; functions as a lister if given no pattern.  It's not important
 ;; enough to warrant a file of its own.
 
+;;; Code:
+
 ;;;###autoload
 (defun repeat-matching-complex-command (&optional pattern)
   "Edit and re-evaluate complex command with name matching PATTERN.

lisp/comint.el

@@ -1,12 +1,16 @@
 ;;; comint.el --- general command interpreter in a window stuff
 
+;; Maintainer: Olin Shivers <shivers@cs.cmu.edu>
+;; Last-Modified: 16 Jul 1992
+;; Version: 2.03
+
 ;;; Copyright Olin Shivers (1988).
 
 ;;; 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 1, or (at your option)
+;;; 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,
@@ -18,6 +22,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 this file.
 
 ;;; Please send me bug reports, bug fixes, and extensions, so that I can
@@ -57,8 +63,6 @@
 ;;; background, dbx, gdb, kermit, prolog, telnet) to use comint-mode
 ;;; instead of shell-mode, see the notes at the end of this file.
 
-(defconst comint-version "2.03")
-
 
 ;;; Brief Command Documentation:
 ;;;============================================================================
@@ -101,6 +105,10 @@
 ;;; comint-mode-hook is the comint mode hook. Basically for your keybindings.
 ;;; comint-load-hook is run after loading in this package.
 
+;;; Code:
+
+(defconst comint-version "2.03")
+
 
 ;;; Buffer Local Variables:
 ;;;============================================================================

lisp/compare-w.el

@@ -1,12 +1,15 @@
 ;;; compare-w.el --- compare text between windows for Emacs.
 
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
+
 ;; Copyright (C) 1986, 1989 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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.
 
+;;; Code:
+
 (defvar compare-windows-whitespace " \t\n"
   "*String of characters considered whitespace for \\[compare-windows].
 Changes in whitespace are optionally ignored.

lisp/dabbrev.el

@@ -1,12 +1,15 @@
 ;;; dabbrev.el --- dynamic abbreviation package for GNU Emacs.
 
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 ; DABBREVS - "Dynamic abbreviations" hack, originally written by Don Morrison
 ; for Twenex Emacs.  Converted to mlisp by Russ Fish.  Supports the table
@@ -30,10 +34,12 @@
 ;  
 ; If anyone feels like hacking at it, Bob Keller (Keller@Utah-20) first
 ; suggested the beast, and has some good ideas for its improvement, but
-; doesn?tknow TECO (the lucky devil...).  One thing that should definitely
+; doesn't know TECO (the lucky devil...).  One thing that should definitely
 ; be done is adding the ability to search some other buffer(s) if you can?t
 ; find the expansion you want in the current one.
 
+;;; Code:
+
 ;; (defun dabbrevs-help ()
 ;;   "Give help about dabbrevs."
 ;;   (interactive)

lisp/diff.el

@@ -1,13 +1,17 @@
 ;;; diff.el --- "DIFF" mode for handling output from unix diff utility.
 
+;; Author: Frank P. Bresz <fpb@ittc.wec.com>
+;; Maintainer: FSF
+;; Created: 27 Jan 1989
+;; Last-Modified: 21 Dec 1992
+
 ;; Copyright (C) 1990 Free Software Foundation, Inc.
-;; Written fpb@ittc.wec.com 1/27/89
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,6 +23,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:
+
 ;; todo: diff-switches flexibility:
 ;; (defconst diff-switches-function
 ;;   '(lambda (file)
@@ -36,7 +42,8 @@
 ;; search for the pattern.  If you only 1 addition you won't find the end
 ;; of the pattern (minor)
 
-;;
+;;; Code:
+
 (defvar diff-switches nil
   "*A list of switches to pass to the diff program.")
 

lisp/dired-aux.el

@@ -1,15 +1,16 @@
 ;; dired-aux.el --- directory browsing command support
-;; Copyright (C) 1985, 1986, 1992 Free Software Foundation, Inc.
 
 ;; Author: Sebastian Kremer <sk@thp.uni-koeln.de>.
 ;; Version: 5.234
 ;; Last-Modified: 14 Jul 1992
 
+;; Copyright (C) 1985, 1986, 1992 Free Software Foundation, Inc.
+
 ;; 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 1, or (at your option)
+;; 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,
@@ -1779,4 +1780,4 @@ Use \\[dired-hide-subdir] to (un)hide a particular subdirectory."
 
 ;;;###end dired-ins.el
 
-;;; dired-aux.el ends here
+;;; dired-aux.el ends here

lisp/disp-table.el

@@ -1,12 +1,16 @@
 ;;; disp-table.el --- functions for dealing with char tables.
 
+;; Author: Howard Gayle
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
+
 ;; Copyright (C) 1987 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -18,8 +22,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:
-;; Written by Howard Gayle.
 
 (defun rope-to-vector (rope)
   (let* ((len (/ (length rope) 2))

lisp/ebuff-menu.el

@@ -1,9 +1,7 @@
 ;;; ebuff-menu.el --- electric-buffer-list mode
 
-; buggestions to mly@ai.mit.edu
+;; Author: Richard Mlynarik <mly@ai.mit.edu>
-
+;; Last-Modified: 21 Dec 1991
-;; who says one can't have typeout windows in gnu emacs?
-;; like ^r select buffer from its emacs lunar or tmacs libraries.
 
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
@@ -11,7 +9,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -23,6 +21,12 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;;; Commentary:
+
+;; who says one can't have typeout windows in gnu emacs?
+;; like ^r select buffer from its emacs lunar or tmacs libraries.
+
+;;; Code:
 
 (require 'electric)
 

lisp/echistory.el

@@ -1,13 +1,16 @@
 ;;; echistory.el --- Electric Command History Mode
 
+;; Author: K. Shane Hartman
+;; Maintainer: FSF
+;; Last-Modified: 09 May 1991
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
-;; Principal author K. Shane Hartman
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,6 +22,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:
 
 (require 'electric)			; command loop
 (require 'chistory)			; history lister

lisp/edmacro.el

@@ -1,4 +1,9 @@
-;;; edmacro.el --- keyboard macro editor for GNU Emacs.  Version 1.02.
+;;; edmacro.el --- keyboard macro editor
+
+;; Author: Dave Gillespie <daveg@csvax.caltech.edu>
+;; Maintainer: FSF
+;; Version: 1.02
+;; Last-Modified: 09 May 1991
 
 ;; Copyright (C) 1990 Free Software Foundation, Inc.
 
@@ -6,7 +11,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -18,13 +23,15 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
-;; Original from: Dave Gillespie, daveg@csvax.caltech.edu.
+;;; Commentary:
 
 ;; To use, type `M-x edit-last-kbd-macro' to edit the most recently
 ;; defined keyboard macro.  If you have used `M-x name-last-kbd-macro'
 ;; to give a keyboard macro a name, type `M-x edit-kbd-macro' to edit
 ;; the macro by name.  When you are done editing, type `C-c C-c' to
 ;; record your changes back into the original keyboard macro.
+
+;;; Code:
 
 ;;; The user-level commands for editing macros.
 

lisp/ehelp.el

@@ -1,12 +1,15 @@
 ;;; ehelp.el --- bindings for electric-help mode
 
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
+
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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.
 
+;;; Code:
+
 (require 'electric)
 (defvar electric-help-map ()
   "Keymap defining commands available in `electric-help-mode'.")

lisp/electric.el

@@ -1,13 +1,16 @@
 ;;; electric.el --- window maker and Command loop for `electric' modes.
 
+;; Author: K. Shane Hartman
+;; Maintainer: FSF
+;; Last-Modified: 09 Jun 1992
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
-;; Principal author K. Shane Hartman
 
 ;; 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 1, or (at your option)
+;; 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,

lisp/emacs-lisp/autoload.el

@@ -1,11 +1,13 @@
 ;;; autoload.el --- maintain autoloads in loaddefs.el.
 
+;; Author: Roland McGrath <roland@gnu.ai.mit.edu>
+;; Last-Modified: 24 Jun 1992
+
 ;;; Copyright (C) 1991, 1992 Free Software Foundation, Inc.
-;;; Written by Roland McGrath.
 ;;;
 ;;; This program 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 1, or (at your option)
+;;; the Free Software Foundation; either version 2, or (at your option)
 ;;; any later version.
 ;;;
 ;;; This program is distributed in the hope that it will be useful,
@@ -19,6 +21,8 @@
 ;;; 02139, USA.
 ;;;
 
+;;; Code:
+
 (defun make-autoload (form file)
   "Turn FORM, a defun or defmacro, into an autoload for source file FILE.
 Returns nil if FORM is not a defun or defmacro."

lisp/emacs-lisp/backquote.el

@@ -1,13 +1,15 @@
 ;; backquote.el --- backquoting for Emacs Lisp macros
 
+;; Author: Dick King (king@kestrel).
+;; Last-Modified: 16 Mar 1992
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
-;; Written by Dick King (king@kestrel).
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,8 +21,9 @@
 ;; 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 is a rudimentry backquote package written by D. King,
+ ;;; This is a rudimentry backquote package written by D. King,
  ;;; king@kestrel, on 8/31/85.  (` x) is a macro
  ;;; that expands to a form that produces x.  (` (a b ..)) is
  ;;; a macro that expands into a form that produces a list of what a b
@@ -58,6 +61,7 @@
  ;;; This is so crunchy that I am considering including a check for
  ;;; this or changing the syntax to ... ,(<form>).  RMS: opinion?
 
+;;; Code:
 
 ;;; a raft of general-purpose macros follows.  See the nearest
  ;;; Commonlisp manual.

lisp/emacs-lisp/cl-indent.el

@@ -1,5 +1,9 @@
 ;;; cl-indent.el --- enhanced lisp-indent mode
 
+;; Author: Richard Mlynark <mly@eddie.mit.edu>
+;; Maintainer: FSF
+;; Last-Modified: 09 May 1991
+
 ;; Copyright (C) 1987 Free Software Foundation, Inc.
 ;; Written by Richard Mlynarik July 1987
 
@@ -7,7 +11,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,6 +23,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:
+
 ;;>> TODO
 ;; :foo
 ;;   bar
@@ -33,6 +39,7 @@
 ;;              baz)
 ;;  Need something better than &rest for such cases
 
+;;; Code:
 
 ;;; Hairy lisp indentation.
 

lisp/emacs-lisp/cust-print.el

@@ -1,9 +1,9 @@
 ;; cus-print.el -- handles print-level and print-circle.
 
-;; LCD Archive Entry:
+;; Author: Daniel LaLiberte <liberte@cs.uiuc.edu>
-;; custom-print|Daniel LaLiberte|liberte@cs.uiuc.edu
+;; Version: 1.0
-;; |Handle print-level, print-circle and more.
+;; Last-Modified: 17 Mar 1992
-;; |$Date: Tue Mar 17, 1992$|$Revision: 1.0$|
+;; Adapted-By: ESR
 
 ;; Copyright (C) 1992 Free Software Foundation, Inc.
 
@@ -11,7 +11,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -23,6 +23,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:
+
 ;; This package provides a general print handler for prin1 and princ
 ;; that supports print-level and print-circle, and by the way,
 ;; print-length since the standard routines are being replaced.  Also,
@@ -88,6 +90,7 @@
 ;; custom-message
 ;; custom-error
 
+;;; Code:
 
 (provide 'custom-print)
 ;; Abbreviated package name: "CP"

lisp/emacs-lisp/debug.el

@@ -1,12 +1,15 @@
 ;;; debug.el --- debuggers and related commands for Emacs
 
+;; Maintainer: FSF
+;; Last-Modified: 08 Jan 1992
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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 debug-function-list nil
   "List of functions currently set for debug on entry.")

lisp/emacs-lisp/float.el

@@ -1,13 +1,16 @@
 ;;; float.el --- floating point arithmetic package.
 
+;; Author: Bill Rosenblatt
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
+
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
-;; Author Bill Rosenblatt
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,6 +22,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:
+
 ;; 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.
@@ -46,6 +51,8 @@
 ;; June 20, 1986
 ;;
 
+;;; Code:
+
 ;; fundamental implementation constants
 (defconst exp-base 2
   "Base of exponent in this floating point representation.")

lisp/emacs-lisp/helper.el

@@ -1,13 +1,16 @@
 ;;; helper.el --- utility help package supporting help in electric modes
 
+;; Author: K. Shane Hartman
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1991
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
-;; Principal author K. Shane Hartman
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,6 +22,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:
 
 ; hey, here's a helping hand.
 

lisp/emacs-lisp/lisp-mode.el

@@ -1,12 +1,15 @@
 ;;; lisp-mode.el --- Lisp mode, and its idiosyncratic commands.
 
+;; Maintainer: FSF
+;; Last-Modified: 03 Jun 1992
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,

lisp/emacs-lisp/lisp.el

@@ -1,12 +1,15 @@
 ;;; lisp.el --- Lisp editing commands for Emacs
 
+;; Maintainer: FSF
+;; Last-Modified: 12 Mar 1992
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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 defun-prompt-regexp nil
   "Non-nil => regexp to ignore, before the `(' that starts a defun.")

lisp/emacs-lisp/profile.el

@@ -1,8 +1,8 @@
 ;;; profile.el -- generate run time measurements of Emacs Lisp functions
 
 ;; Author: Boaz Ben-Zvi <boaz@lcs.mit.edu>
-;; Created: 7 Feb 1992
+;; Created: 07 Feb 1992
-;; Last-Modified: 7 Feb 1992
+;; Last-Modified: 07 Feb 1992
 ;; Version: 1.0
 ;; Adapted-By: ESR
 
@@ -12,7 +12,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,

lisp/emulation/edt.el

@@ -1,5 +1,10 @@
 ;;; edt.el --- EDT emulation in Emacs
 
+;; Author: Mike Clarkson <mike@yetti.UUCP>
+;; Maintainer: FSF
+;; Created: 27 Aug 1986
+;; Last-Modified: 09 May 1991
+
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 ;;  It started from public domain code by Mike Clarkson
 ;;  but has been greatly altered.
@@ -8,7 +13,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -20,25 +25,13 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
-;; From mike@yetti.UUCP Fri Aug 29 12:49:28 1986
+;;; Commentary:
-;; Path: yetti!mike@uunet.uu.net
+
-;; From: mike@yetti.UUCP (Mike Clarkson )
-;; Newsgroups: net.sources
-;; Subject: Gnu Emacs EDT Emulation - Introduction - 1/3
-;; Date: 27 Aug 86 23:30:33 GMT
-;; Reply-To: mike@yetti.UUCP (Mike Clarkson )
-;; Organization: York University Computer Science
-;; 
 ;; Here's my EDT emulation for GNU Emacs that is based on the EDT emulation
 ;; for Gosling's Emacs sent out on the net a couple of years ago by Lynn Olson
 ;; at Tektronics.  This emulation was widely distributed as the file edt.ml
 ;; in the maclib directory of most Emacs distributions.
 ;;      
-;; My emulation consists of two files: edt.el and edtdoc.el.  The edtdoc.el
-;; file is the documentation, that you can add to the beginning of edt.el if
-;; you want.  I have split them because I have been loading the edt.el file a
-;; lot during debugging.
-;;      
 ;; I will gladly take all criticisms and complaints to heart, and will fix what
 ;; bugs I can find.  As this is my first Emacs Lisp hack, you may have to root
 ;; out a few nasties hidden in the code.  Please let me know if you find any
@@ -120,12 +113,8 @@
 ;; UUCP.  If you have a UUCP or BITNET address please use it for communication
 ;; so that I can reach you directly.  If you have both, the BITNET address
 ;; is preferred.
-;; -- 
+
-;; Mike Clarkson,		  ...!allegra \		BITNET:	mike@YUYETTI or
+;;; Code:
-;; CRESS, York University,	  ...!decvax   \		SYMALG@YUSOL
-;; 4700 Keele Street,	  ...!ihnp4     > !utzoo!yetti!mike
-;; North York, Ontario,	  ...!linus    /		     
-;; CANADA M3J 1P3.		  ...!watmath /	Phone: +1 (416) 737-2100 x 7767
 
 (require 'keypad)
 

lisp/emulation/mlconvert.el

@@ -1,12 +1,15 @@
 ;;; mlconvert.el --- convert buffer of Mocklisp code to real lisp.
 
+;; Maintainer: FSF
+;; Last-Modified: 09 May 1991
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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.
 
+;;; Code:
+
 ;;;###autoload
 (defun convert-mocklisp-buffer ()
   "Convert buffer of Mocklisp code to real Lisp that GNU Emacs can run."

lisp/emulation/mlsupport.el

@@ -1,12 +1,15 @@
 ;;; mlsupport.el --- run-time support for mocklisp code.
 
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 (defmacro ml-defun (&rest defs)
   (list 'ml-defun-1 (list 'quote defs)))

lisp/env.el

@@ -1,12 +1,15 @@
 ;;; setenv.el --- functions to manipulate environment variables.
 
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
+
 ;;; Copyright Free Software Foundation 1991
 
 ;;; 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 1, or (at your option)
+;;; 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,
@@ -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.
 
+;;; Code:
+
 (defun setenv (variable value)
   "Set the value of the environment variable named VARIABLE to VALUE.
 VARIABLE and VALUE should both be strings.

lisp/files.el

@@ -1,12 +1,15 @@
 ;;; files.el --- file input and output commands for Emacs
 
+;; Maintainer: FSF
+;; Last-Modified: 09 Jul 92
+
 ;; Copyright (C) 1985, 1986, 1987, 1992 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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.
 
+;;; Code:
+
 (defconst delete-auto-save-files t
   "*Non-nil means delete a buffer's auto-save file when the buffer is saved.")
 

lisp/find-dired.el

@@ -1,13 +1,18 @@
 ;; find-dired.el --- run a `find' command and dired the output
 
-;;; Copyright (C) 1991 Roland McGrath
+;; Author: Roland McGrath <roland@gnu.ai.mit.edu>
+;;	Sebastian Kremer <sk@thp.uni-koeln.de>
+;; Maintainer: Roland McGrath <roland@gnu.ai.mit.edu>
+;; Last-Modified: 16 Mar 1992
 
 (defconst find-dired-version (substring "$Revision: 1.9 $" 11 -2)
   "$Id: find-dired.el,v 1.9 1991/11/11 13:24:31 sk Exp $")
 
+;;; Copyright (C) 1991 Roland McGrath
+
 ;;; This program 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 1, or (at your option)
+;;; the Free Software Foundation; either version 2, or (at your option)
 ;;; any later version.
 ;;;
 ;;; This program is distributed in the hope that it will be useful,
@@ -19,13 +24,8 @@
 ;;; program's author (send electronic mail to roland@ai.mit.edu) or from
 ;;; the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA
 ;;; 02139, USA.
-;;;
+
-;; LISPDIR ENTRY for the Elisp Archive ===============================
+;;; Commentary:
-;;    LCD Archive Entry:
-;;    find-dired|Roland McGrath, Sebastian Kremer
-;;    |roland@gnu.ai.mit.edu, sk@thp.uni-koeln.de
-;;    |Run a `find' command and dired the output
-;;    |$Date: 1991/11/11 13:24:31 $|$Revision: 1.9 $|
 
 ;; INSTALLATION ======================================================
 
@@ -46,6 +46,8 @@
 ;;
 ;; in your ~/.emacs.
 
+;;; Code:
+
 (require 'dired)
 ;;;###autoload
 (defvar find-ls-option (if (eq system-type 'berkeley-unix) "-ls"

lisp/find-gc.el

@@ -1,12 +1,15 @@
 ;;; find-gc.el --- detect functions that call the garbage collector
 
+;; Maintainer: FSF
+;; Last-Modified: 21 Nov 1990
+
 ;; Copyright (C) 1992 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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.
 
+;; Code:
+
 ;;; Produce in unsafe-list the set of all functions that may invoke GC.
 ;;; This expects the Emacs sources to live in emacs-source-directory.
 ;;; It creates a temporary working directory /tmp/esrc.

lisp/float-sup.el

@@ -1,12 +1,15 @@
 ;;; float-sup.el --- detect absence of floating-point support in Emacs runtime
 
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
+
 ;; Copyright (C) 1985, 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
 ;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 1, or (at your option)
+;; 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,
@@ -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.
 
+;;; Code:
+
 ;; Provide a meaningful error message if we are running on
 ;; bare (non-float) emacs.
 ;; Can't test for 'floatp since that may be defined by float-imitation

lisp/ftp.el

@@ -9,7 +9,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
+
 ;; Prevent changes in major modes from altering these variables.
 (put 'ftp-temp-file-name 'permanent-local t)
 (put 'ftp-file 'permanent-local t)

lisp/gnus.el

@@ -1,13 +1,17 @@
 ;;; gnus.el --- GNUS: an NNTP-based News Reader for GNU Emacs
 
-;; Copyright (C) 1987, 1988, 1989, 1990 Free Software Foundation, Inc.
+;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>
+;; Last-Modified: 10 Jun 1992
+
 ;; $Header: gnus.el,v 3.13 90/03/23 13:24:27 umerin Locked $
 
+;; Copyright (C) 1987, 1988, 1989, 1990 Free Software Foundation, Inc.
+
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,6 +23,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:
+
 ;; GNUS Mailing List:
 ;; There are two mailing lists for GNUS lovers in the world:
 ;;
@@ -47,6 +53,8 @@
 ;; (3) Multi-GNUS (Talking to many hosts same time).
 ;; (4) Asynchronous transmission of large messages.
 
+;;; Code:
+
 (require 'nntp)
 (require 'mail-utils)
 

lisp/gnusmail.el

@@ -1,13 +1,17 @@
 ;;; gnusmail.el --- mail reply commands for GNUS newsreader
 
-;; Copyright (C) 1990 Free Software Foundation, Inc.
+;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>
+;; Last-Modified: 10 Jun 1992
+
 ;; $Header: gnusmail.el,v 1.1 90/03/23 13:24:39 umerin Locked $
 
+;; Copyright (C) 1990 Free Software Foundation, Inc.
+
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,7 +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.
 
-(require 'gnus)
+;;; Commentary:
 
 ;; Provides mail reply and mail other window command using usual mail
 ;; interface and mh-e interface.
@@ -32,6 +36,10 @@
 ;; gnus-mail-other-window-method to gnus-mail-reply-using-mhe and
 ;; gnus-mail-other-window-using-mhe, respectively.
 
+;;; Code:
+
+(require 'gnus)
+
 (autoload 'news-mail-reply "rnewspost")
 (autoload 'news-mail-other-window "rnewspost")
 

lisp/gnusmisc.el

@@ -1,13 +1,17 @@
 ;;; gnusmisc.el --- miscellaneous commands for GNUS newsreader
 
-;; Copyright (C) 1989, 1990 Free Software Foundation, Inc.
+;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>
+;; Last-Modified: 10 Jun 1992
+
 ;; $Header: gnusmisc.el,v 1.2 90/03/23 13:25:04 umerin Locked $
 
+;; Copyright (C) 1989, 1990 Free Software Foundation, Inc.
+
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,6 +23,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 'gnus)
 
 ;;;

lisp/gnuspost.el

@@ -1,13 +1,17 @@
 ;;; gnuspost.el --- post news commands for GNUS newsreader
 
-;; Copyright (C) 1989, 1990 Free Software Foundation, Inc.
+;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>
+;; Last-Modified: 10 Jun 1992
+
 ;; $Header: gnuspost.el,v 1.2 90/03/23 13:25:16 umerin Locked $
 
+;; Copyright (C) 1989, 1990 Free Software Foundation, Inc.
+
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,6 +23,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 'gnus)
 
 (defvar gnus-organization-file "/usr/lib/news/organization"

lisp/gosmacs.el

@@ -1,12 +1,15 @@
 ;;; gosmacs.el --- rebindings to imitate Gosmacs.
 
+;; Maintainer: FSF
+;; Last-Modified: 09 May 1991
+
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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 non-gosmacs-binding-alist nil)
 

lisp/grow-vers.el

@@ -1,14 +1,15 @@
 ;;; grow-vers.el --- increment Emacs version number
 
-;; Load this file to add a new level (starting at zero)
+;; Maintainer: FSF
-;; to the Emacs version number recorded in version.el.
+;; Last-Modified: 31 Oct 1989
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -20,6 +21,12 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;;; Commentary:
+
+;; Load this file to add a new level (starting at zero)
+;; to the Emacs version number recorded in version.el.
+
+;;; Code:
 
 (insert-file-contents "lisp/version.el")
 

lisp/help.el

@@ -1,12 +1,15 @@
 ;;; help.el --- help commands for Emacs
 
+;; Maintainer: FSF
+;; Last-Modified: 30 Jun 1992
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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.
 
+;;; Code:
+
 (defvar help-map (make-sparse-keymap)
   "Keymap for characters following the Help key.")
 

lisp/hexl.el

@@ -1,4 +1,7 @@
-;;; hexl-mode.el --- edit a file in a hex dump format.
+;;; hexl-mode.el --- edit a file in a hex dump format using the hexl filter.
+
+;; Author: Keith Gabryelski <ag@wheaties.ai.mit.edu>
+;; Last-Modified: 06 Mar 1991
 
 ;; Copyright (C) 1989 Free Software Foundation, Inc.
 
@@ -6,7 +9,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -18,9 +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:
-;; By: Keith Gabryelski (ag@wheaties.ai.mit.edu)
+
-;;
 ;; This may be useful in your .emacs:
 ;;
 ;;	(autoload 'hexl-find-file "hexl"
@@ -37,6 +39,8 @@
 ;; ASCII region of the screen (if your emacs supports this) instead of
 ;; changing them to dots.
 
+;;; Code:
+
 ;;
 ;; vars here
 ;;

lisp/inc-vers.el

@@ -1,12 +1,15 @@
 ;;; inc-vers.el --- load this to increment the recorded Emacs version number.
 
+;; Maintainer: FSF
+;; Last-Modified: 31 Oct 1989
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 (insert-file-contents "../lisp/version.el")
 

lisp/indent.el

@@ -1,12 +1,15 @@
 ;;; indent.el --- indentation commands for Emacs
 
+;; Maintainer: FSF
+;; Last-Modified: 09 Jul 1992
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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 indent-line-function 'indent-to-left-margin "\
 Function to indent current line.");Now in loaddefs.el

lisp/info.el

@@ -1,12 +1,15 @@
 ;;; info.el --- info package for Emacs.
-;;; Note that nowadays we expect info files to be made using makeinfo.
+
+;; Maintainer: FSF
+;; Last-Modified: 30 Jun 1992
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -18,6 +21,12 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;;; Commentary:
+
+;;; Note that nowadays we expect info files to be made using makeinfo.
+
+;;; Code:
+
 (defvar Info-history nil
   "List of info nodes user has visited.
 Each element of list is a list (FILENAME NODENAME BUFFERPOS).")

lisp/informat.el

@@ -1,12 +1,15 @@
 ;;; informat.el --- info support functions package for Emacs
 
+;; Maintainer: FSF
+;; Last-Modified: 09 May 1991
+
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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.
 
+;;; Code:
+
 (require 'info)
 
 ;;;###autoload

lisp/international/iso-ascii.el

@@ -1,4 +1,8 @@
-;;; iso-ascii.el --- set up char tables for ISO 8859/1 character set for ASCII terminals.
+;;; iso-ascii.el --- set up char tables for ISO 8859/1 on ASCII terminals.
+
+;; Author: Howard Gayle
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
 
 ;; Copyright (C) 1987 Free Software Foundation, Inc.
 
@@ -6,7 +10,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -18,6 +22,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:
 
 ;; Written by Howard Gayle.  See display-table.el for details.
 
@@ -25,6 +30,8 @@
 ;; ASCII terminals.  The display strings for the characters are
 ;; more-or-less based on TeX.
 
+;;; Code:
+
 (require 'disp-table)
 
 (standard-display-ascii 160 "{_}")   ; NBSP (no-break space)

lisp/international/iso-insert.el

@@ -1,12 +1,16 @@
 ;;; iso-insert.el --- insert functions for ISO 8859/1.
 
+;; Author: Howard Gayle
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
+
 ;; Copyright (C) 1987 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -18,6 +22,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:
 
 ;; Written by Howard Gayle.  See case-table.el for details.
 

lisp/international/iso-swed.el

@@ -1,4 +1,8 @@
-;;; iso-swed.el --- 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 ttys
+
+;; Author: Howard Gayle
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
 
 ;; Copyright (C) 1987 Free Software Foundation, Inc.
 
@@ -6,7 +10,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -18,6 +22,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:
 
 ;; Written by Howard Gayle.  See case-table.el for details.
 

lisp/international/swedish.el

@@ -1,12 +1,15 @@
 ;;; swedish.el --- miscellaneous functions for dealing with Swedish.
 
+;; Author: Howard Gayle
+;; Maintainer: FSF
+
 ;; Copyright (C) 1988 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 ;; Written by Howard Gayle.  See case-table.el for details.
 

lisp/isearch-old.el

@@ -1,12 +1,15 @@
 ;;; isearch.el --- incremental search commands
 
+;; Maintainer: FSF
+;; Last-Modified: 30 Jun 1992
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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.
 
+;;; Code:
+
 (defvar search-last-string "" "\
 Last string search for by a non-regexp search command.
 This does not include direct calls to the primitive search functions,

lisp/iso8859-1.el

@@ -1,11 +1,16 @@
-;; Set up case-conversion and syntax tables for ISO 8859/1 character set.
+;; iso8859-1.el --- set up case-conversion and syntax tables for ISO 8859/1
+
+;; Author: Howard Gayle
+;; Maintainer: FSF
+;; Last-Modified: 24 Jun 1992
+
 ;; Copyright (C) 1988 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -17,6 +22,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:
 
 ;; Written by Howard Gayle.  See case-table.el for details.
 

lisp/kermit.el

@@ -10,7 +10,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -73,6 +73,8 @@
 ;; Please let me know if any bugs turn up.
 ;; Feb 1988, Jeff Norden - jeff@colgate.csnet
 
+;;; Code:
+
 (require 'shell)
 
 (defvar kermit-esc-char "\C-\\" "*Kermit's escape char")

lisp/ledit.el

@@ -1,12 +1,15 @@
 ;;; ledit.el --- Emacs side of ledit interface
 
+;; Maintainer: FSF
+;; Last-Modified: 13 May 1991
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 ;;; To do:
 ;;; o lisp -> emacs side of things (grind-definition and find-definition)

lisp/loadup.el

@@ -1,5 +1,8 @@
 ;;; loadup.el --- load up standardly loaded Lisp files for Emacs.
 
+;; Maintainer: FSF
+;; Last-Modified: 14 Jul 1992
+
 ;; This is loaded into a bare Emacs to make a dumpable one.
 ;; Copyright (C) 1985, 1986, 1992 Free Software Foundation, Inc.
 
@@ -7,7 +10,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,6 +22,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:
+
 ;;; We don't want to have any undo records in the dumped Emacs.
 (buffer-disable-undo "*scratch*")
 

lisp/lpr.el

@@ -1,12 +1,15 @@
 ;;; lpr.el --- print Emacs buffer on line printer.
 
+;; Maintainer: FSF
+;; Last-Modified: 19 Apr 1992
+
 ;; Copyright (C) 1985, 1988, 1992 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 ;;;###autoload
 (defconst lpr-switches nil "\

lisp/macros.el

@@ -1,12 +1,15 @@
 ;;; macros.el --- non-primitive commands for keyboard macros.
 
+;; Maintainer: FSF
+;; Last-Modified: 05 Nov 1991
+
 ;; Copyright (C) 1985, 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
 ;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 1, or (at your option)
+;; 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,
@@ -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:
 
 ;;;###autoload
 (defun name-last-kbd-macro (symbol)

lisp/mail/emacsbug.el

@@ -1,17 +1,17 @@
 ;;; emacsbug.el --- command to report Emacs bugs to appropriate mailing list.
 
+;; Author: K. Shane Hartman
 ;; Maintainer: FSF
 ;; Last-Modified: 21 Dec 1991
 
 ;; Not fully installed because it can work only on Internet hosts.
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
-;; Principal author K. Shane Hartman
 
 ;; 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 1, or (at your option)
+;; 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,

lisp/mail/mail-utils.el

@@ -1,12 +1,15 @@
 ;;; mail-utils.el --- utility functions used both by rmail and rnews
 
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 ;;; We require lisp-mode to make sure that lisp-mode-syntax-table has
 ;;; been initialized.

lisp/mail/mailalias.el

@@ -1,12 +1,15 @@
 ;;; mailalias.el --- expand mailing address aliases defined in ~/.mailrc.
 
+;; Maintainer: FSF
+;; Last-Modified: 01 Jun 1992
+
 ;; Copyright (C) 1985, 1987 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 ;; Called from sendmail-send-it, or similar functions,
 ;; only if some mail aliases are defined.

lisp/mail/rmail.el

@@ -1,12 +1,15 @@
 ;;; rmail.el --- main code of "RMAIL" mail reader for Emacs.
 
+;; Maintainer: FSF
+;; Last-Modified: 24 Apr 1992
+
 ;; Copyright (C) 1985, 1986, 1987, 1988, 1991, 1992 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 ;; Souped up by shane@mit-ajax based on ideas of rlk@athena.mit.edu
 ;;   New features include attribute and keyword support, message

lisp/mail/rmailedit.el

@@ -1,12 +1,15 @@
 ;;; rmailedit.el --- "RMAIL edit mode"  Edit the current message.
 
+;; Maintainer: FSF
+;; Last-Modified: 31 Jul 1991
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 (require 'rmail)
 

lisp/mail/rmailkwd.el

@@ -1,12 +1,15 @@
 ;;; rmailkwd.el --- part of the "RMAIL" mail reader for Emacs.
 
+;; Maintainer: FSF
+;; Last-Modified: 31 Oct 1989
+
 ;; Copyright (C) 1985, 1988 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 ;; Global to all RMAIL buffers.  It exists primarily for the sake of
 ;; completion.  It is better to use strings with the label functions

lisp/mail/rmailmsc.el

@@ -1,12 +1,15 @@
 ;;; rmailmsc.el --- miscellaneous support functions for the RMAIL mail reader
 
+;; Maintainer: FSF
+;; Last-Modified: 31 Oct 1989
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,

lisp/mail/rmailout.el

@@ -1,7 +1,7 @@
 ;;; rmailout.el --- "RMAIL" mail reader for Emacs: output message to a file.
 
 ;; Maintainer: FSF
-;; Last-Modified: 1 Mar 1991
+;; Last-Modified: 01 Mar 1991
 
 ;; Copyright (C) 1985, 1987 Free Software Foundation, Inc.
 
@@ -9,7 +9,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,

lisp/mail/rmailsort.el

@@ -1,11 +1,14 @@
 ;;; rmailsort.el --- Rmail: sort messages.
 
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
+
 ;; Copyright (C) 1990 Free Software Foundation, Inc.
 ;; 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 1, or (at your option)
+;; 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,
@@ -17,6 +20,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:
 
 (require 'rmail)
 (require 'sort)

lisp/mail/rmailsum.el

@@ -1,12 +1,15 @@
 ;;; rmailsum.el --- "RMAIL" mail reader for Emacs.
 
+;; Maintainer: FSF
+;; Last-Modified: 30 Nov 1990
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 ;; summary things
 

lisp/mail/rnews.el

@@ -1,12 +1,15 @@
 ;;; rnews.el --- USENET news reader for gnu emacs
 
+;; Maintainer: FSF
+;; Last-Modified: 16 Mar 1992
+
 ;; Copyright (C) 1985, 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
 ;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 1, or (at your option)
+;; 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,
@@ -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.
 
+;;; Change Log:
+
 ;; Created Sun Mar 10,1985 at 21:35:01 ads and sundar@hernes.ai.mit.edu
 ;; Should do the point pdl stuff sometime
 ;; finito except pdl.... Sat Mar 16,1985 at 06:43:44
@@ -44,6 +49,9 @@
 ;; added caesar-region, rename news-caesar-buffer-body, hacked accordingly
 ;;	tower@prep Nov 21 1986
 ;; added tower@prep 22 Apr 87
+
+;;; Code:
+
 (require 'mail-utils)
 
 (autoload 'rmail-output "rmailout"

lisp/mail/rnewspost.el

@@ -1,12 +1,15 @@
 ;;; rnewspost.el --- USENET news poster/mailer for GNU Emacs
 
+;; Maintainer: FSF
+;; Last-Modified: 30 May 1992
+
 ;; Copyright (C) 1985, 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
 ;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 1, or (at your option)
+;; 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,
@@ -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.
 
+;; Change Log:
+
 ;; moved posting and mail code from rnews.el
 ;;	tower@prep.ai.mit.edu Wed Oct 29 1986
 ;; brought posting code almost up to the revision of RFC 850 for News 2.11
@@ -32,8 +37,6 @@
 ;;	tower@prep 28 Apr 87
 ;; commented out Posting-Front-End to save USENET bytes tower@prep Jul 31 87
 ;; commented out -n and -t args in news-inews     tower@prep 15 Oct 87
-(require 'sendmail)
-(require 'rnews)
 
 ;Now in paths.el.
 ;(defvar news-inews-program "inews"
@@ -48,6 +51,11 @@
 ;;; >> Nuked by Mly to autoload those functions again, as the duplication of
 ;;; >>  code was making maintenance too difficult.
 
+;;; Code:
+
+(require 'sendmail)
+(require 'rnews)
+
 (defvar news-reply-mode-map () "Mode map used by news-reply.")
 
 (or news-reply-mode-map

lisp/mail/sendmail.el

@@ -1,12 +1,15 @@
 ;;; sendmail.el --- mail sending commands for Emacs.
 
+;; Maintainer: FSF
+;; Last-Modified: 24 Jun 1992
+
 ;; Copyright (C) 1985, 1986, 1992 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 ;;;###autoload
 (defconst mail-self-blind nil "\

lisp/mail/undigest.el

@@ -1,12 +1,15 @@
 ;;; undigest.el --- digest-cracking support for the RMAIL mail reader
 
+;; Maintainer: FSF
+;; Last-Modified: 14 Jul 1992
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -18,7 +21,11 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
-;; note Interent RFP934
+;;; Commentary:
+
+;; See Internet RFC 934
+
+;;; Code:
 
 (defun undigestify-rmail-message ()
   "Break up a digest message into its constituent messages.

lisp/makesum.el

@@ -1,7 +1,7 @@
 ;;; makesum.el --- generate key binding summary for Emacs
 
 ;; Maintainer: FSF
-;; Last-Modified: 9 May 1991
+;; Last-Modified: 09 May 1991
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
@@ -9,7 +9,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,

lisp/man.el

@@ -1,12 +1,15 @@
 ;;; man.el --- read in and display parts of Unix manual.
 
+;; Maintainer: FSF
+;; Last-Modified: 21 Dec 1991
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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.
 
+;;; Code:
+
 ;;;###autoload
 (defun manual-entry (topic &optional section)
   "Display the Unix manual entry for TOPIC.

lisp/map-ynp.el

@@ -1,11 +1,13 @@
 ;;; map-ynp.el --- General-purpose boolean question-asker.
 
+;; Author: Roland McGrath <roland@gnu.ai.mit.edu>
+;; Last-Modified: 14 Mar 1992
+
 ;;; Copyright (C) 1991, 1992 Free Software Foundation, Inc.
-;;; Written by Roland McGrath.
 ;;;
 ;;; This program 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 1, or (at your option)
+;;; the Free Software Foundation; either version 2, or (at your option)
 ;;; any later version.
 ;;;
 ;;; This program is distributed in the hope that it will be useful,
@@ -17,7 +19,9 @@
 ;;; program's author (send electronic mail to roland@ai.mit.edu) or from
 ;;; the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA
 ;;; 02139, USA.
-;;;
+
+;;; Commentary:
+
 ;;; map-y-or-n-p is a general-purpose question-asking function.
 ;;; It asks a series of y/n questions (a la y-or-n-p), and decides to
 ;;; applies an action to each element of a list based on the answer.
@@ -26,6 +30,8 @@
 ;;; questions; ESC or q to answer n to all remaining questions; . to answer
 ;;; y once and then n for the remainder; and you can get help with C-h.
 
+;;; Code:
+
 (defun map-y-or-n-p-help (object objects action)
   (format "Type SPC or `y' to %s the current %s;
 DEL or `n' to skip the current %s;

lisp/medit.el

@@ -1,14 +1,16 @@
-;;; medit.el --- Lisp interface between GNU Emacs and MEDIT package.
+;;; medit.el --- front-end to the MEDIT package for editing MDL
+
+;; Author: K. Shane Hartman
+;; Maintainer: FSF
+;; Last-Modified: 05 Apr 1991
 
-;; Emacs under MDL.
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
-;; Principal author K. Shane Hartman
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -20,10 +22,13 @@
 ;; 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 package depends on two MDL packages: MEDIT and FORKS which
 ;; >> can be obtained from the public (network) library at mit-ajax.
 
+;;; Code:
+
 (require 'mim-mode)
 
 (defconst medit-zap-file (concat "/tmp/" (user-login-name) ".medit.mud")

lisp/mim-mode.el

@@ -1,13 +1,16 @@
 ;;; mim-mode.el --- Mim (MDL in MDL) mode.
 
+;; Author: K. Shane Hartman
+;; Maintainer: FSF
+;; Last-Modified: 31 Oct 1989
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
-;; Principal author K. Shane Hartman
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,6 +22,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:
 
 (autoload 'fast-syntax-check-mim "mim-syntax"
 	  "Checks Mim syntax quickly.

lisp/mim-syntax.el

@@ -1,13 +1,16 @@
 ;;; mim-syntax.el --- syntax checker for Mim (MDL).
 
+;; Author: K. Shane Hartman
+;; Maintainer: FSF
+;; Last-Modified: 31 Oct 1989
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
-;; Principal author K. Shane Hartman
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,6 +22,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:
 
 (require 'mim-mode)
 

lisp/misc.el

@@ -1,12 +1,15 @@
 ;;; misc.el --- basic editing commands for Emacs
 
+;; Maintainer: FSF
+;; Last-Modified: 31 Oct 1989
+
 ;; Copyright (C) 1989 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 (defun copy-from-above-command (&optional arg)
   "Copy characters from previous nonblank line, starting just above point.

lisp/netunam.el

@@ -1,6 +1,6 @@
 ;;; netunam.el --- HP-UX RFA Commands
 
-;; Author: CPH <cph@zurich.ai.mit.edu>
+;; Author: Chris Hanson <cph@zurich.ai.mit.edu>
 ;; Last-Modified: 31 Oct 1989
 
 ;;; $Header: netunam.el,v 1.3 88/12/21 16:32:23 GMT cph Exp $
@@ -11,7 +11,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,

lisp/novice.el

@@ -1,12 +1,15 @@
 ;;; novice.el --- handling of disabled commands ("novice mode") for Emacs.
 
+;; Maintainer: FSF
+;; Last-Modified: 22 May 1991
+
 ;; Copyright (C) 1985, 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
 ;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 1, or (at your option)
+;; 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,
@@ -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:
 
 ;; This function is called (by autoloading)
 ;; to handle any disabled command.

lisp/options.el

@@ -1,12 +1,15 @@
 ;;; options.el --- edit Options command for Emacs.
 
+;; Maintainer: FSF
+;; Last-Modified: 10 Apr 1991
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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:
 
 ;;;###autoload
 (defun list-options ()

lisp/paths.el

@@ -1,12 +1,15 @@
 ;;; paths.el --- define pathnames for use by various Emacs commands.
 
+;; Maintainer: FSF
+;; Last-Modified: 05 Dec 1991
+
 ;; Copyright (C) 1986, 1988 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -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 default settings for names of certain files and directories
 ;; that Emacs needs to refer to from time to time.
@@ -25,6 +29,8 @@
 ;; If these settings are not right, override them with `setq'
 ;; in site-init.el.  Do not change this file.
 
+;;; Code:
+
 (defvar Info-default-directory-list
   (list "/usr/local/lib/info/"
 	(expand-file-name "../info/" data-directory))

lisp/play/dissociate.el

@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 09 May 1991
+;; Keywords: games
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
@@ -9,7 +10,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,

lisp/play/doctor.el

@@ -1,12 +1,16 @@
 ;;; doctor.el --- psychological help for frustrated users.
 
+;; Maintainer: FSF
+;; Last-Modified: 24 Apr 1992
+;; Keywords: games
+
 ;; Copyright (C) 1985, 1987 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -18,6 +22,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 doctor-cadr (x) (car (cdr x)))
 (defun doctor-caddr (x) (car (cdr (cdr x))))

lisp/play/gomoku.el

@@ -1,12 +1,17 @@
 ;;; gomoku.el --- Gomoku game between you and Emacs
 
+;; Author: Phillippe Schnoebelen <phs@lifia.imag.fr>
+;; Last-Modified: 16 Mar 1992
+;; Adapted-By: ESR
+;; Keywords: games
+
 ;; Copyright (C) 1988 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -18,6 +23,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:
+
 ;;; Gomoku game between you and GNU Emacs.  Last modified on 13 Sep 1988
 ;;;
 ;;; Written by Ph. Schnoebelen (phs@lifia.imag.fr), 1987, 1988
@@ -74,6 +81,8 @@
 ;; The algorithm is briefly described in section "THE SCORE TABLE". Some
 ;; parameters may be modified if you want to change the style exhibited by the
 ;; program.
+
+;;; Code:
 
 ;;;
 ;;; GOMOKU MODE AND KEYMAP.

lisp/play/life.el

@@ -1,13 +1,15 @@
 ;;; life.el --- John Horton Conway's `Life' game for GNU Emacs
 
+;; Author: Kyle Jones <talos!kjones@uunet.uu.net>
+;; Last-Modified: 16 Mar 1992
+
 ;; Copyright (C) 1988 Free Software Foundation, Inc.
-;; Contributed by Kyle Jones, talos!kjones@uunet.uu.net
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,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:
+
 (defconst life-patterns
   [("@@@" " @@" "@@@")
    ("@@@ @@@" "@@  @@ " "@@@ @@@")

lisp/play/spook.el

@@ -1,7 +1,7 @@
 ;;; spook.el --- spook phrase utility for overloading the NSA line eater
 
 ;;; Maintainer: FSF
-;;; Last-modified: 05 Dec 1991
+;;; Last-Modified: 05 Dec 1991
 
 ;; Copyright (C) 1988 Free Software Foundation, Inc.
 
@@ -9,7 +9,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,

lisp/play/yow.el

@@ -1,7 +1,7 @@
 ;;; yow.el --- generate random zippyisms
 
 ;; Maintainer: FSF
-;; Last-modified: 14 Jun 1992
+;; Last-Modified: 14 Jun 1992
 
 ;; Copyright (C) 1985, 1987 Free Software Foundation, Inc.
 
@@ -9,7 +9,7 @@
 
 ;; 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 1, or (at your option)
+;; 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,

lisp/progmodes/c-mode.el

@@ -1,12 +1,16 @@
 ;;; c-mode.el --- C code editing commands for Emacs
 
+;; Maintainer: FSF
+;; Last-Modified: 11 Jul 1992
+;; Keywords: c
+
 ;; Copyright (C) 1985, 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
 ;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 1, or (at your option)
+;; 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,
@@ -18,6 +22,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 c-mode-abbrev-table nil
   "Abbrev table in use in C mode.")

lisp/progmodes/cmacexp.el

@@ -1,12 +1,16 @@
 ;;; cmacexp.el --- C macro expansion
 
+;; Maintainer: FSF
+;; Last-Modified: 17 Apr 1992
+;; Keywords: c
+
 ;; Copyright (C) 1988 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -18,6 +22,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 c-macro-preprocessor "/lib/cpp"
   "*Command to be used for C preprocessing.")

lisp/progmodes/etags.el

@@ -1,4 +1,8 @@
-;; Tags facility for Emacs.
+;; etags.el --- etags facility for Emacs
+
+;; Author: Roland McGrath <roland@gnu.ai.mit.edu>
+;; Keywords: tools
+
 ;; Copyright (C) 1985, 1986, 1988, 1989, 1991, 1992
 ;;	Free Software Foundation, Inc.
 
@@ -18,6 +22,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:
+
 ;;;###autoload
 (defvar tags-file-name nil "\
 *File name of tags table.
@@ -1079,3 +1085,5 @@ for \\[find-tag] (which see).  See also `visit-tags-table-buffer'."
 ;;;###autoload (define-key esc-map "?" 'complete-tag)	;? XXX
 
 (provide 'etags)
+
+;;; etags.el ends here

lisp/progmodes/fortran.el

@@ -1,6 +1,30 @@
-;;; fortran.el --- Fortran mode for GNU Emacs  (version 1.28.3, July 15, 1991)
+;;; fortran.el --- Fortran mode for GNU Emacs
+
+;; Author: Michael D. Prange <prange@erl.mit.edu>
+;; Maintainer: bug-fortran-mode@erl.mit.edu
+;; Version 1.28.3
+;; Last-Modified: 15 Jul 1991
 
 ;;; Copyright (c) 1991 Free Software Foundation, Inc.
+
+;; 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; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; 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.
+
+;;; Commentary:
+
 ;;; Written by Michael D. Prange (prange@erl.mit.edu)
 ;;; Maintained (as of version 1.28) by Stephen A. Wood (saw@hallc1.cebaf.gov)
 ;;; This version is an update of version 1.21 (Oct 1, 1985).
@@ -70,26 +94,12 @@
 ;;; 14. When in tab mode, the fortran column ruler will not be correct if
 ;;;     tab-width is not 8.
 
-;; 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 1, or (at your option)
-;; any later version.
-
-;; GNU Emacs is distributed in the hope that it will be useful,
-;; 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.
-
-;; 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.
-
 ;;; Author acknowledges help from Stephen Gildea <gildea@erl.mit.edu>
 
 ;;; Bugs to bug-fortran-mode@erl.mit.edu
 
+;;; Code:
+
 ;;;###autoload
 (defvar fortran-tab-mode-default nil
   "*Default tabbing/carriage control style for empty files in fortran mode.

lisp/progmodes/icon.el

@@ -1,19 +1,16 @@
 ;;; icon.el --- mode for editing Icon code
 
-;; Note: use
+;; Author: Chris Smith <convex!csmith>
-;;  (autoload 'icon-mode "icon" nil t)
+;; Created: 15 Feb 89
-;;  (setq auto-mode-alist (cons '("\\.icn$" . icon-mode) auto-mode-alist))
+;; Last-Modified: 06 Mar 1991
-;; if not permanently installed in your emacs
 
-;; Icon code editing commands for Emacs
-;; Derived from c-mode.el  15-Feb-89  Chris Smith  convex!csmith
 ;; Copyright (C) 1989 Free Software Foundation, Inc.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -25,6 +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:
+
+;; Note: use
+;;  (autoload 'icon-mode "icon" nil t)
+;;  (setq auto-mode-alist (cons '("\\.icn$" . icon-mode) auto-mode-alist))
+;; if not permanently installed in your emacs
+
+;;; Code:
 
 (defvar icon-mode-abbrev-table nil
   "Abbrev table in use in Icon-mode buffers.")

lisp/progmodes/prolog.el

@@ -1,13 +1,15 @@
 ;;; prolog.el --- major mode for editing and running Prolog under Emacs
 
+;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>
+;; Last-Modified: 08 May 1989
+
 ;; Copyright (C) 1986, 1987 Free Software Foundation, Inc.
-;; Author Masanobu UMEDA (umerin@flab.flab.fujitsu.junet)
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,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:
+
 (defvar prolog-mode-syntax-table nil)
 (defvar prolog-mode-abbrev-table nil)
 (defvar prolog-mode-map nil)

lisp/progmodes/scheme.el

@@ -1,13 +1,17 @@
 ;;; scheme.el --- Scheme mode, and its idiosyncratic commands.
 
+;; Author: Bill Rozas <jinz@prep.ai.mit.edu>
+;; Last-Modified: 16 Mar 1992
+
+;;; $Header: scheme.el,v 1.7 88/07/15 20:20:00 GMT cph Exp $
+
 ;; Copyright (C) 1986, 1987, 1988 Free Software Foundation, Inc.
-;; Adapted from Lisp mode by Bill Rozas, jinx@prep.
 
 ;; 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 1, or (at your option)
+;; 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,
@@ -19,13 +23,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:
 
+;; Adapted from Lisp mode by Bill Rozas, jinx@prep.
 ;; Initially a query replace of Lisp mode, except for the indentation 
 ;; of special forms.  Probably the code should be merged at some point 
 ;; so that there is sharing between both libraries.
 
-;;; $Header: scheme.el,v 1.7 88/07/15 20:20:00 GMT cph Exp $
+;;; Code:
-
 
 (defvar scheme-mode-syntax-table nil "")
 (if (not scheme-mode-syntax-table)