*** empty log message ***

diff --git a/lisp/emulation/ws-mode.el b/lisp/emulation/ws-mode.el
index 4094d30..27c6b60 100644 (file)
--- a/lisp/emulation/ws-mode.el
+++ b/lisp/emulation/ws-mode.el
@@ -1,5 +1,5 @@
-;; File:               ws-mode.el
-;; Description:                WordStar emulation mode for GNU Emacs
+;;; ws-mode.el --- WordStar emulation mode for GNU Emacs
+
 ;; Author:             Juergen Nickelsen <nickel@cs.tu-berlin.de>
 ;; Created:            13 Feb 1991
 ;; Version:            0.7
@@ -773,3 +773,5 @@ sWith: " )
     (ws-error (cond (ws-block-begin-marker "Block end marker not set")
                    (ws-block-end-marker "Block begin marker not set")
                    (t "Block markers not set")))))
+
+;;; ws-mode.el ends here

diff --git a/lisp/play/yow.el b/lisp/play/yow.el
index 0f1c51b..4f142d3 100644 (file)
--- a/lisp/play/yow.el
+++ b/lisp/play/yow.el
@@ -1,3 +1,5 @@
+yow.el --- generate random zippyisms
+
 ;; Copyright (C) 1985, 1987 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -86,3 +88,4 @@
 
 (provide 'yow)
 
+;;; yow.el ends here

diff --git a/lisp/vmsproc.el b/lisp/vmsproc.el
index b4451a4..47c35ee 100644 (file)
--- a/lisp/vmsproc.el
+++ b/lisp/vmsproc.el
@@ -1,4 +1,5 @@
-;; Run asynchronous VMS subprocesses under Emacs
+;; vmsx.el --- run asynchronous VMS subprocesses under Emacs
+
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.

diff --git a/lisp/vmsx.el b/lisp/vmsx.el
index a68c6de..2d7fc89 100644 (file)
--- a/lisp/vmsx.el
+++ b/lisp/vmsx.el
@@ -1,4 +1,5 @@
-;; Run asynchronous VMS subprocesses under Emacs
+;;; vmsx.el --- run asynchronous VMS subprocesses under Emacs
+
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -135,3 +136,5 @@ line to the last line for resubmission."
   (kill-line))
 
 (define-key esc-map "$" 'subprocess-command)
+
+;;; vmsx.el ends here

diff --git a/lisp/vt100-led.el b/lisp/vt100-led.el
index e8f3708..2a096a7 100644 (file)
--- a/lisp/vt100-led.el
+++ b/lisp/vt100-led.el
@@ -1,4 +1,5 @@
-;; Functions for controlling the LEDs on VT-100 terminals & clones.
+;;; vt100-led.el --- functions for LED control on VT-100 terminals & clones.
+
 ;; Copyright (C) 1988 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -59,3 +60,5 @@ Element 0 is not used.")
     (send-string-to-terminal o)))
 
 (provide 'vt100-led)
+
+;;; vt100-led.el ends here

diff --git a/lisp/window.el b/lisp/window.el
index fe36479..5101fa0 100644 (file)
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -1,4 +1,5 @@
-;; GNU Emacs window commands aside from those written in C.
+;;; windows.el --- GNU Emacs window commands aside from those written in C.
+
 ;; Copyright (C) 1985, 1989 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -124,3 +125,5 @@ Use with a register previously set with \\[window-config-to-register]."
 (define-key ctl-x-map "7" 'register-to-window-config)
 (define-key ctl-x-map "}" 'enlarge-window-horizontally)
 (define-key ctl-x-map "{" 'shrink-window-horizontally)
+
+;;; windows.el ends here

diff --git a/lisp/x-menu.el b/lisp/x-menu.el
index 878dde0..bc5c1ae 100644 (file)
--- a/lisp/x-menu.el
+++ b/lisp/x-menu.el
@@ -1,3 +1,5 @@
+;;; x-menu.el --- menu support for X 
+
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -143,3 +145,5 @@ This also creates the menu itself."
         (litem (cdr (nth item x-menu-items-alist))))
     (and litem (funcall litem event)))
   (pop-to-buffer x-menu-assoc-buffer))
+
+;;; x-menu.el ends here

diff --git a/lisp/xscheme.el b/lisp/xscheme.el
index 0fb795d..d2a2cce 100644 (file)
--- a/lisp/xscheme.el
+++ b/lisp/xscheme.el
@@ -1,4 +1,5 @@
-;; Run Scheme under Emacs
+;;; xscheme.el --- run Scheme under Emacs
+
 ;; Copyright (C) 1986, 1987, 1989, 1990 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -869,3 +870,5 @@ the remaining input.")
                   (let ((state (parse-partial-sexp start (nth 2 state))))
                     (if (nth 2 state) 'many 'one)))))
        (set-syntax-table old-syntax-table)))))
+
+;;; xscheme.el ends here