*** empty log message ***

lisp/emacs-lisp/copyright.el

@@ -1,3 +1,5 @@
+;;; upd-copyr.el --- update the copyright notice in a GNU Emacs elisp file
+
 ;;; Copyright (C) 1991, 1992 Free Software Foundation, Inc.
 ;;; Written by Roland McGrath.
 ;;;
@@ -128,3 +130,5 @@ Put this on write-file-hooks."
   nil)
 
 (provide 'upd-copyr)
+
+;;; upd-copyr.el ends here

lisp/emulation/vi.el

@@ -1,4 +1,5 @@
-; Evi: Major mode for emulating "vi" editor under GNU Emacs.
+;;; vi.el --- major mode for emulating "vi" editor under GNU Emacs.
+
 ; Originally written by : seismo!wucs!nz@rsch.wisc.edu (Neal Ziring)
 ; Extensively redesigned and rewritten by wu@crys.wisc.edu (Felix S.T. Wu)
 ; Last revision: 01/07/87 Wed (for GNU Emacs 18.33)
@@ -1445,3 +1446,5 @@ With arg, inserts that many newlines."
 			  (setq arg (1- arg)))
 			(if flag (forward-char 1))))) arg)
     t))
+
+;;; vi.el ends here

lisp/mail/undigest.el

@@ -1,4 +1,5 @@
-;; "RMAIL" mail reader for Emacs.
+;;; undigest.el --- digest-cracking support for the RMAIL mail reader
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -103,3 +104,4 @@ Leaves original message, deleted, before the undigestified messages."
 	     (delete-region (point-min) (point-max))
 	     (rmail-show-message rmail-current-message))))))
 
+;;; undigest.el ends here

lisp/play/studly.el

@@ -1,4 +1,4 @@
-;;; StudlyCaps (tm)(r)(c)(xxx)
+;;; studly.el --- StudlyCaps (tm)(r)(c)(xxx)
 
 (defun studlify-region (begin end)
   "Studlify-case the region"
@@ -46,3 +46,5 @@
   "Studlify-case the current buffer"
   (interactive "*")
   (studlify-region (point-min) (point-max)))
+
+;;; studly.el ends here

lisp/term-nasty.el

@@ -1,3 +1,5 @@
+;;; term-nasty.el --- Damned Things from terminfo.el
+
 Some people used to be bothered by the following comments that were
 found in terminal.el.  We decided they were distracting, and that it
 was better not to have them there.  On the other hand, we didn't want
@@ -18,4 +20,6 @@ and C-i even though the termcap doesn't say they may be used:
 ;fuck me harder
 ;again and again!
 ;wa12id!!
-;(spiked)
+;(spiked)
+
+;;; term-nasty.el ends here

lisp/terminal.el

@@ -1,4 +1,5 @@
-;; Terminal emulator for GNU Emacs.
+;;; terminal.el --- terminal emulator for GNU Emacs.
+
 ;; Copyright (C) 1986, 1987, 1988, 1989 Free Software Foundation, Inc.
 ;; Written by Richard Mlynarik, November 1986.
 
@@ -1217,3 +1218,5 @@ of the terminal-emulator"
 	   (concat "\"" harder "\"")))))
 
 (provide 'terminal)
+
+;;; terminal.el ends here

lisp/textmodes/tex-mode.el

@@ -1,4 +1,5 @@
-;; TeX, LaTeX, and SliTeX mode commands.
+;;; tex-mode.el --- TeX, LaTeX, and SliTeX mode commands.
+
 ;; Copyright (C) 1985, 1986, 1989 Free Software Foundation, Inc.
 ;; Rewritten following contributions by William F. Schelter
 ;; and Dick King (king@kestrel).
@@ -803,3 +804,4 @@ Runs the shell command defined by tex-show-queue-command."
 
 (provide 'tex-mode)
 
+;;; tex-mode.el ends here

lisp/textmodes/texinfmt.el

@@ -1,5 +1,4 @@
-;;;; texinfmt.el
-;;;; Convert Texinfo files to Info files.
+;;;; texinfmt.el --- convert Texinfo files to Info files.
 
 ;;;; Version 2.00   14 Dec 1990
 
@@ -1819,3 +1818,5 @@ For example, invoke
 	     (message ">>  %s" s))
 	   (setq error 1))))
       (kill-emacs error))))
+
+;;; texinfmt.el ends here

lisp/textmodes/texinfo.el

@@ -1,5 +1,4 @@
-;;;; texinfo.el
-;;;; Major mode for editing Texinfo files.
+;;;; texinfo.el ---- major mode for editing Texinfo files.
 
 ;;;; Version 2.00   14 Dec 1990
 
@@ -413,3 +412,4 @@ Runs the shell command defined by tex-dvi-print-command."
 
 (provide 'texinfo)
 
+;;; texinfo.el ends here

lisp/textmodes/texnfo-upd.el

@@ -1,5 +1,4 @@
-;;;; texnfo-upd.el
-;;;; A utility for updating nodes and menus in Texinfo files.
+;;; texnfo-upd.el --- a utility for updating nodes and menus in Texinfo files.
 
 ;;;; Version 2.00   14 Dec 1990
 
@@ -1721,7 +1720,6 @@ chapter."
           included-file-list)))))
   (message "Multiple files updated."))
 
-;;;;;;;;;;;;;;;; end texnfo-upd.el ;;;;;;;;;;;;;;;;
-
 (provide 'texnfo-upd)
 
+;;; texnfo-upd.el ends here

lisp/textmodes/text-mode.el

@@ -1,4 +1,5 @@
-;; Text mode, and its ideosyncratic commands.
+;;; text-mode.el --- text mode, and its idiosyncratic commands.
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -148,3 +149,5 @@ the distance between the end of the text and `fill-column'."
       (indent-to 
 	(+ left-margin 
 	   (/ (- fill-column left-margin line-length) 2))))))
+
+;;; text-mode.el ends here

lisp/textmodes/underline.el

@@ -1,4 +1,5 @@
-;; Insert or remove underlining (done by overstriking) in Emacs.
+;;; underline.el --- insert/remove underlining (done by overstriking) in Emacs.
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -46,3 +47,5 @@ which specify the range to operate on."
      (goto-char (min start end))
      (while (re-search-forward "_\\|_" end1 t)
        (delete-char -2)))))
+
+;;; underline.el ends here

lisp/time.el

@@ -1,4 +1,5 @@
-;; Display time and load in mode line of Emacs.
+;;; time.el --- display time and load in mode line of Emacs.
+
 ;; Copyright (C) 1985, 1986, 1987 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -122,3 +123,5 @@ After each update, `display-time-hook' is run with `run-hooks'."
   (while (file-symlink-p file)
     (setq file (file-symlink-p file)))
   (> (nth 7 (file-attributes file)) 0))
+
+;;; time.el ends here

lisp/timer.el

@@ -1,4 +1,5 @@
-;; Run a function with args at some time in future
+;;; timer.el --- run a function with args at some time in future
+
 ;; Copyright (C) 1990 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -91,3 +92,5 @@ the call to the function."
   (or timer-alist timer-dont-exit (process-send-eof timer-process)))
 
 (provide 'timer)
+
+;;; timer.el ends here

lisp/uncompress.el

@@ -1,3 +1,23 @@
+;;; uncompress.el --- auto-decompression hook for visiting .Z files
+
+;; 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)
+;; 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.
+
 ;; When we are about to make a backup file,
 ;; uncompress the file we visited
 ;; so that making the backup can work properly.
@@ -45,3 +65,5 @@ It then selects a major mode from the uncompressed file name and contents."
 	(goto-char (point-min))
 	(setq error nil)
 	t)))
+
+;;; uncompress.el ends here

lisp/unused.el

@@ -1,5 +1,6 @@
-;; Editing commands in GNU Emacs that turned out not to be used.
-;; They were added with an eye to making possible a more CCA-compatible
+;;; unused.el --- editing commands in GNU Emacs that turned out not to be used.
+
+;; These were added with an eye to making possible a more CCA-compatible
 ;; command set; but that turned out not to be interesting.
 
 (defun mark-beginning-of-buffer ()
@@ -30,3 +31,5 @@ With argument, do this that many times."
 With argument, do this that many times."
   (interactive "p")
   (forward-to-word (- arg)))
+
+;;; unused.el ends here

lisp/userlock.el

@@ -1,3 +1,5 @@
+;;; userlock.el --- handle file access contention between multiple users
+
 ;; Copyright (C) 1985, 1986 Free Software Foundation, inc.
 
 ;; This file is part of GNU Emacs.
@@ -123,4 +125,4 @@ If you say `n', the change you started to make will be aborted.
 Usually, you should type `n' and then `M-x revert-buffer',
 to get the latest version of the file, then make the change again.")))
 
-
+;;; userlock.el ends here

lisp/view.el

@@ -1,4 +1,5 @@
-;; View: Peruse file or buffer without editing.
+;;; view.el --- peruse file or buffer without editing.
+
 ;; Copyright (C) 1985, 1989 Free Software Foundation, Inc.
 ;; Principal author K. Shane Hartman
 
@@ -439,3 +440,4 @@ invocations return to earlier marks."
 
 (provide 'view)
 
+;;; view.el ends here

lisp/vms-patch.el

@@ -1,4 +1,5 @@
-;; Override parts of files.el for VMS.
+;;; vms-patch.el --- override parts of files.el for VMS.
+
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -107,3 +108,5 @@ If the logical name `EMACS_FILE_NAME' is defined, `find-file' that file."
 		  " sys$login:delete-me.txt/name=""GNUprintbuffer"" "
 		  (mapconcat 'identity switches " "))
 	  nil nil nil)))
+
+;;; vms-patch.el ends here

lisp/vmsproc.el

@@ -1,4 +1,4 @@
-;; vmsx.el --- run asynchronous VMS subprocesses under Emacs
+;; vmsproc.el --- run asynchronous VMS subprocesses under Emacs
 
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 
@@ -137,3 +137,5 @@ line to the last line for resubmission."
   (kill-line))
 
 (define-key esc-map "$" 'subprocess-command)
+
+;;; vmsproc.el ends here