Added standard library headers.

lisp/ange-ftp.el

@@ -1,10 +1,10 @@
-;; -*-Emacs-Lisp-*-
-;;; ??? Waiting for papers from several people.
-;; Description:  transparent FTP support for GNU Emacs
+;;; ange-ftp.el --- transparent FTP support for GNU Emacs
 
 ;;; Copyright (C) 1989, 1990, 1991, 1992  Free Software Foundation, Inc.
+;;; ??? Waiting for papers from several people.
 ;;;
 ;;; Author: Andy Norman (ange@hplb.hpl.hp.com)
+;;; Keywords: tools
 ;;;
 ;;; This program is free software; you can redistribute it and/or modify
 ;;; it under the terms of the GNU General Public License as published by
@@ -21,7 +21,7 @@
 ;;; the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA
 ;;; 02139, USA.
 
-;;; Description:
+;;; Commentary:
 ;;;
 ;;; This package attempts to make accessing files and directories using FTP
 ;;; from within GNU Emacs as simple and transparent as possible.  A subset of
@@ -610,6 +610,8 @@
 ;;; whose names I've forgotten who have helped to debug and fix problems with
 ;;; ange-ftp.el.
 
+
+;;; Code:
 (require 'comint)
 
 ;;;; ------------------------------------------------------------
@@ -857,7 +859,7 @@ SIZE, if supplied, should be a prime number."
 ;;;; Internal variables.
 ;;;; ------------------------------------------------------------
 
-(defconst ange-ftp-version "$Revision: 1.12 $")
+(defconst ange-ftp-version "$Revision: 1.13 $")
 
 (defvar ange-ftp-data-buffer-name " *ftp data*"
   "Buffer name to hold directory listing data received from ftp process.")
@@ -5310,3 +5312,5 @@ Other orders of $ and _ seem to all work just fine.")
 ;;;; ------------------------------------------------------------
 
 (provide 'ange-ftp)
+
+;;; ange-ftp.el ends here

lisp/byte-run.el

@@ -1,4 +1,4 @@
-;; byte-run.el --- byte-compiler support for inlining
+;;; byte-run.el --- byte-compiler support for inlining
 
 ;; Copyright (C) 1992 Free Software Foundation, Inc.
 

lisp/case-table.el

@@ -1,4 +1,4 @@
-;;; case-table.el ---code to extend the character set and support case tables.
+;;; case-table.el --- code to extend the character set and support case tables.
 
 ;; Copyright (C) 1988 Free Software Foundation, Inc.
 

lisp/cl.el

@@ -1,4 +1,5 @@
-;; Common-Lisp extensions for GNU Emacs Lisp.
+;;; cl.el --- Common-Lisp extensions for GNU Emacs Lisp.
+
 ;; Copyright (C) 1987, 1988, 1989, 1992  Free Software Foundation, Inc.
 
 ;; Author: Cesar Quiroz <quiroz@cs.rochester.edu>
@@ -23,6 +24,8 @@
 ;; file named COPYING.  Among other things, the copyright notice
 ;; and this notice must be preserved on all copies.
 
+;;; Commentary:
+
 ;;; Notes from Rob Austein on his mods
 ;; yaya:/usr/u/sra/cl/cl.el, 5-May-1991 16:01:34, sra
 ;;
@@ -46,8 +49,6 @@
 ;;     at compile time?  Lisp is going to check for a binding at run-time
 ;;     anyway, so maybe we should just assume the user's right here.
 
-;;; Commentary:
-
 ;;;; These are extensions to Emacs Lisp that provide some form of
 ;;;; Common Lisp compatibility, beyond what is already built-in
 ;;;; in Emacs Lisp.

lisp/cmulisp.el

@@ -6,6 +6,8 @@
 ;;; way you like, as long as you don't charge money for it, remove this
 ;;; notice, or hold me liable for its results.
 
+;;; Commentary:
+
 ;;; This replaces the standard inferior-lisp mode.
 ;;; Hacked from tea.el by Olin Shivers (shivers@cs.cmu.edu). 8/88
 ;;; Please send me bug reports, bug fixes, and extensions, so that I can
@@ -126,6 +128,9 @@
 
 ;;; Read the rest of this file for more information.
 
+
+;;; Code:
+
 (defvar cmulisp-filter-regexp "\\`\\s *\\(:\\(\\w\\|\\s_\\)\\)?\\s *\\'"
   "*What not to save on inferior Lisp's input history
 Input matching this regexp is not saved on the input history in cmulisp

lisp/cmuscheme.el

@@ -1,4 +1,5 @@
-;;; cmuscheme.el -- Scheme process in a buffer. Adapted from tea.el.
+;;; cmuscheme.el --- Scheme process in a buffer. Adapted from tea.el.
+
 ;;; Copyright (C) 1988 Free Software Foundation, Inc.
 
 ;; Author: Olin Shivers <olin.shivers@cs.cmu.edu>

lisp/dired-aux.el

@@ -1,4 +1,4 @@
-;; dired-aux.el --- all of dired except what people usually use
+;;; dired-aux.el --- all of dired except what people usually use
 
 ;; Copyright (C) 1985, 1986, 1992 Free Software Foundation, Inc.
 

lisp/dired.el

@@ -1,4 +1,4 @@
-;; dired.el --- directory-browsing commands
+;;; dired.el --- directory-browsing commands
 
 ;; Copyright (C) 1985, 1986, 1992 Free Software Foundation, Inc.
 

lisp/electric.el

@@ -22,9 +22,12 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;;; Commentary:
 
 ; zaaaaaaap
 
+;;; Code:
+
 ;; perhaps this should be in subr.el...
 (defun shrink-window-if-larger-than-buffer (window)
   (save-excursion
@@ -187,4 +190,4 @@
 
 (provide 'electric)
 
-; electric.el ends here
+;;; electric.el ends here

lisp/emacs-lisp/backquote.el

@@ -1,4 +1,4 @@
-;; backquote.el --- backquoting for Emacs Lisp macros
+;;; backquote.el --- backquoting for Emacs Lisp macros
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 

lisp/emacs-lisp/cust-print.el

@@ -1,4 +1,4 @@
-;; cust-print.el -- handles print-level and print-circle.
+;; cust-print.el --- handles print-level and print-circle.
 
 ;; Copyright (C) 1992 Free Software Foundation, Inc.
 

lisp/progmodes/etags.el

@@ -1,4 +1,4 @@
-;; etags.el --- etags facility for Emacs
+;;; etags.el --- etags facility for Emacs
 
 ;; Copyright (C) 1985, 1986, 1988, 1989, 1992, 1993
 ;;	Free Software Foundation, Inc.