*** empty log message ***

diff --git a/lisp/emacs-lisp/copyright.el b/lisp/emacs-lisp/copyright.el
index d7d20af..70f1a43 100644 (file)
--- a/lisp/emacs-lisp/copyright.el
+++ b/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

diff --git a/lisp/emulation/vi.el b/lisp/emulation/vi.el
index 55259ed..fb76742 100644 (file)
--- a/lisp/emulation/vi.el
+++ b/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

diff --git a/lisp/mail/undigest.el b/lisp/mail/undigest.el
index 583251e..5b80fbf 100644 (file)
--- a/lisp/mail/undigest.el
+++ b/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

diff --git a/lisp/play/studly.el b/lisp/play/studly.el
index 5661b04..e40b186 100644 (file)
--- a/lisp/play/studly.el
+++ b/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

diff --git a/lisp/term-nasty.el b/lisp/term-nasty.el
index 86a4a1e..2a0d13a 100644 (file)
--- a/lisp/term-nasty.el
+++ b/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)
\ No newline at end of file
+;(spiked)
+
+;;; term-nasty.el ends here

diff --git a/lisp/terminal.el b/lisp/terminal.el
index 314cc45..97293fe 100644 (file)
--- a/lisp/terminal.el
+++ b/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

diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index eb5ff51..bc92872 100644 (file)
--- a/lisp/textmodes/tex-mode.el
+++ b/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

diff --git a/lisp/textmodes/texinfmt.el b/lisp/textmodes/texinfmt.el
index 7d38045..f23ffbb 100644 (file)
--- a/lisp/textmodes/texinfmt.el
+++ b/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

diff --git a/lisp/textmodes/texinfo.el b/lisp/textmodes/texinfo.el
index edb72a8..76cbc5b 100644 (file)
--- a/lisp/textmodes/texinfo.el
+++ b/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

diff --git a/lisp/textmodes/texnfo-upd.el b/lisp/textmodes/texnfo-upd.el
index 6954952..377de8a 100644 (file)
--- a/lisp/textmodes/texnfo-upd.el
+++ b/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

diff --git a/lisp/textmodes/text-mode.el b/lisp/textmodes/text-mode.el
index 39122d5..56a4ab5 100644 (file)
--- a/lisp/textmodes/text-mode.el
+++ b/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

diff --git a/lisp/textmodes/underline.el b/lisp/textmodes/underline.el
index 89edcfe..da341b2 100644 (file)
--- a/lisp/textmodes/underline.el
+++ b/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 "_\b\\|\b_" end1 t)
        (delete-char -2)))))
+
+;;; underline.el ends here

diff --git a/lisp/time.el b/lisp/time.el
index 27485be..2978b81 100644 (file)
--- a/lisp/time.el
+++ b/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

diff --git a/lisp/timer.el b/lisp/timer.el
index 905706f..b938307 100644 (file)
--- a/lisp/timer.el
+++ b/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

diff --git a/lisp/uncompress.el b/lisp/uncompress.el
index 6897c7c..fd450ac 100644 (file)
--- a/lisp/uncompress.el
+++ b/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

diff --git a/lisp/unused.el b/lisp/unused.el
index 0808593..9b7eea4 100644 (file)
--- a/lisp/unused.el
+++ b/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

diff --git a/lisp/userlock.el b/lisp/userlock.el
index 5866b03..23430fa 100644 (file)
--- a/lisp/userlock.el
+++ b/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

diff --git a/lisp/view.el b/lisp/view.el
index 3307ba8..8bb69bf 100644 (file)
--- a/lisp/view.el
+++ b/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

diff --git a/lisp/vms-patch.el b/lisp/vms-patch.el
index 15302b3..48ecbeb 100644 (file)
--- a/lisp/vms-patch.el
+++ b/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

diff --git a/lisp/vmsproc.el b/lisp/vmsproc.el
index 47c35ee..efd1482 100644 (file)
--- a/lisp/vmsproc.el
+++ b/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