X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/ff9c6df4b0766bef72f6b1f4c8fca65737d9ad6b..f52154007f41abe6857acab91e31ab4a7d18210d:/lisp/unused.el

diff --git a/lisp/unused.el b/lisp/unused.el
index 0808593f6e..1cb956b213 100644
--- a/lisp/unused.el
+++ b/lisp/unused.el
@@ -1,7 +1,17 @@
-;; 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.
+;;; This file is in the public domain, as it was distributed in
+;;; 1985 or 1986 without a copyright notice.  Written by RMS.
+
+;; Maintainer: FSF
+;; Keywords: emulations
+
+;;; Commentary:
+
+;; These were added with an eye to making possible a more CCA-compatible
 ;; command set; but that turned out not to be interesting.
 
+;;; Code:
+
 (defun mark-beginning-of-buffer ()
   "Set mark at the beginning of the buffer."
   (interactive)
@@ -30,3 +40,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