Added or corrected documentation headers

1 files changed, 4 insertions, 2 deletions

diff --git a/lisp/finder.el b/lisp/finder.el
index 5be96e85b21..ce3b858c009 100644
--- a/lisp/finder.el
+++ b/lisp/finder.el
@@ -86,7 +86,9 @@ arguments compiles from `load-path'."
       (erase-buffer)
       (insert ";;; finder-inf.el --- keyword-to-package mapping\n")
       (insert ";; Keywords: help\n")
-      (insert ";;; Don't edit this file.  It's generated by finder.el\n\n")
+      (insert ";;; Commentary:\n")
+      (insert ";; Don't edit this file.  It's generated by finder.el\n\n")
+      (insert ";;; Code:\n")
       (insert "\n(setq finder-package-info '(\n")
       (mapcar
        (function
@@ -119,7 +121,7 @@ arguments compiles from `load-path'."
            (directory-files (or d ".")))
           ))
        (or dirs load-path))
-      (insert "))\n\n(provide 'finder-inf)\n")
+      (insert "))\n\n(provide 'finder-inf)\n\n;;; finder-inf.el ends here\n")
       (kill-buffer "*finder-scratch*")
       (eval-current-buffer) ;; So we get the new keyword list immediately
       (basic-save-buffer)