changeset 811:e694e0879463

*** empty log message ***
author Eric S. Raymond <esr@snark.thyrsus.com>
date Fri, 17 Jul 1992 08:15:29 +0000
parents 80303373daae
children 485e82a8acb5
files lisp/=diary-lib.el lisp/=gnus.el lisp/=gnusmail.el lisp/=gnusmisc.el lisp/=gnuspost.el lisp/=gosmacs.el lisp/=grow-vers.el lisp/=inc-vers.el lisp/=man.el lisp/=medit.el lisp/=mh-e.el lisp/=mhspool.el lisp/=mim-mode.el lisp/=mim-syntax.el lisp/add-log.el lisp/apropos.el lisp/array.el lisp/byte-run.el lisp/calendar/calendar.el lisp/calendar/holidays.el lisp/cmuscheme.el lisp/comint.el lisp/diff.el lisp/ehelp.el lisp/electric.el lisp/emacs-lisp/autoload.el lisp/emacs-lisp/backquote.el lisp/emacs-lisp/cl-indent.el lisp/emacs-lisp/cust-print.el lisp/emacs-lisp/debug.el lisp/emacs-lisp/disass.el lisp/emacs-lisp/float.el lisp/emacs-lisp/helper.el lisp/emacs-lisp/lisp-mode.el lisp/emacs-lisp/lisp.el lisp/emacs-lisp/ring.el lisp/emulation/edt.el lisp/emulation/mlconvert.el lisp/emulation/mlsupport.el lisp/find-dired.el lisp/flow-ctrl.el lisp/frame.el lisp/help.el lisp/info.el lisp/informat.el lisp/ledit.el lisp/loadup.el lisp/lpr.el lisp/mail/mail-utils.el lisp/mail/mailabbrev.el lisp/mail/mailalias.el lisp/mail/mailpost.el lisp/makesum.el lisp/map-ynp.el lisp/play/life.el lisp/play/meese.el lisp/progmodes/awk-mode.el lisp/progmodes/compile.el lisp/progmodes/fortran.el lisp/progmodes/hideif.el lisp/progmodes/icon.el lisp/progmodes/inf-lisp.el lisp/progmodes/make-mode.el lisp/progmodes/modula2.el lisp/textmodes/fill.el
diffstat 65 files changed, 194 insertions(+), 119 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/=diary-lib.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/=diary-lib.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Author: Edward M. Reingold <reingold@cs.uiuc.edu>
 ;; Last-Modified: 30 Jun 1992
+;; Keyword: calendar
 
 ;; Copyright (C) 1989, 1990 Free Software Foundation, Inc.
 
--- a/lisp/=gnus.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/=gnus.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>
 ;; Last-Modified: 10 Jun 1992
+;; Keywords: news
 
 ;; $Header: gnus.el,v 3.13 90/03/23 13:24:27 umerin Locked $
 
--- a/lisp/=gnusmail.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/=gnusmail.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>
 ;; Last-Modified: 10 Jun 1992
+;; Keywords: news
 
 ;; $Header: gnusmail.el,v 1.1 90/03/23 13:24:39 umerin Locked $
 
--- a/lisp/=gnusmisc.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/=gnusmisc.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>
 ;; Last-Modified: 10 Jun 1992
+;; Keywords: news
 
 ;; $Header: gnusmisc.el,v 1.2 90/03/23 13:25:04 umerin Locked $
 
--- a/lisp/=gnuspost.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/=gnuspost.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>
 ;; Last-Modified: 10 Jun 1992
+;; Keywords: news
 
 ;; $Header: gnuspost.el,v 1.2 90/03/23 13:25:16 umerin Locked $
 
--- a/lisp/=gosmacs.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/=gosmacs.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 09 May 1991
+;; Keywords: emulations
 
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 
--- a/lisp/=grow-vers.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/=grow-vers.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 31 Oct 1989
+;; Keywords: internal
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
--- a/lisp/=inc-vers.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/=inc-vers.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 31 Oct 1989
+;; Keywords: internal
 
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
--- a/lisp/=man.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/=man.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 21 Dec 1991
+;; Keywords: unix
 
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
--- a/lisp/=medit.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/=medit.el	Fri Jul 17 08:15:29 1992 +0000
@@ -3,6 +3,7 @@
 ;; Author: K. Shane Hartman
 ;; Maintainer: FSF
 ;; Last-Modified: 05 Apr 1991
+;; Keywords: languages
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
--- a/lisp/=mh-e.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/=mh-e.el	Fri Jul 17 08:15:29 1992 +0000
@@ -3,6 +3,7 @@
 ;; Author: James Larus <larus@ginger.berkeley.edu>
 ;; Version: 3.7
 ;; Last-Modified: 30 Jun 1992
+;; Keywords: mail
 
 (defvar mh-e-RCS-id)
 (setq mh-e-RCS-id "$Header: /var/home/larus/lib/emacs/RCS/mh-e.el,v 3.1 90/09/28 15:47:58 larus Exp Locker: larus $")
--- a/lisp/=mhspool.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/=mhspool.el	Fri Jul 17 08:15:29 1992 +0000
@@ -3,6 +3,7 @@
 ;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>
 ;; Maintainer: FSF
 ;; Last-Modified: 16 Mar 1992
+;; Keywords: mail, news
 
 ;; $Header: mhspool.el,v 1.5 90/03/23 13:25:23 umerin Locked $
 
--- a/lisp/=mim-mode.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/=mim-mode.el	Fri Jul 17 08:15:29 1992 +0000
@@ -3,6 +3,7 @@
 ;; Author: K. Shane Hartman
 ;; Maintainer: FSF
 ;; Last-Modified: 31 Oct 1989
+;; Keywords: languages
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
--- a/lisp/=mim-syntax.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/=mim-syntax.el	Fri Jul 17 08:15:29 1992 +0000
@@ -3,6 +3,7 @@
 ;; Author: K. Shane Hartman
 ;; Maintainer: FSF
 ;; Last-Modified: 31 Oct 1989
+;; Keywords: languages
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
--- a/lisp/add-log.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/add-log.el	Fri Jul 17 08:15:29 1992 +0000
@@ -1,5 +1,7 @@
 ;;; add-log.el --- change log maintenance commands for Emacs
 
+;; Maintainer: FSF
+
 ;; Copyright (C) 1985, 86, 87, 88, 89, 90, 91, 1992
 ;;	Free Software Foundation, Inc.
 
@@ -7,7 +9,7 @@
 
 ;; 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)
+;; the Free Software Foundation; either version 2, or (at your option)
 ;; any later version.
 
 ;; GNU Emacs is distributed in the hope that it will be useful,
@@ -19,6 +21,7 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;;; Code:
 
 ;;;###autoload
 (defvar change-log-default-name nil
@@ -169,12 +172,16 @@
 
 (defun change-log-mode ()
   "Major mode for editting change logs; like Indented Text Mode.
+Prevents numeric backups and sets `left-margin' to 8 and `fill-column'
+to 74.
 New log entries are usually made with \\[add-change-log-entry]."
   (interactive)
   (kill-all-local-variables)
   (indented-text-mode)
   (setq major-mode 'change-log-mode)
   (setq mode-name "Change Log")
+  (setq left-margin 8)
+  (setq fill-column 74)
   ;; Let each entry behave as one paragraph:
   (set (make-local-variable 'paragraph-start) "^\\s *$\\|^^L")
   (set (make-local-variable 'paragraph-separate) "^\\s *$\\|^^L\\|^\\sw")
@@ -248,3 +255,5 @@
 				     t)
 		 (buffer-substring (match-beginning 1)
 				   (match-end 1))))))))
+
+;;; add-log.el ends here
--- a/lisp/apropos.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/apropos.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Author: Joe Wells <jbw@bigbird.bu.edu>
 ;; Last-Modified: 5 May 1989
+;; Keyword: help
 
 ;; Copyright (C) 1989 Free Software Foundation, Inc.
 
--- a/lisp/array.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/array.el	Fri Jul 17 08:15:29 1992 +0000
@@ -3,6 +3,7 @@
 ;; Author David M. Brown
 ;; Maintainer: FSF
 ;; Last-Modified: 30 Jan 1991
+;; Keyword: extensions
 
 ;; Copyright (C) 1987 Free Software Foundation, Inc.
 
--- a/lisp/byte-run.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/byte-run.el	Fri Jul 17 08:15:29 1992 +0000
@@ -1,29 +1,17 @@
-;;; -*- Mode:Emacs-Lisp -*-
+;; byte-run.el --- byte-compiler support for inlining
 
-;; Runtime support for the new optimizing byte compiler.  
-;; By Jamie Zawinski <jwz@lucid.com>.
-;; Last Modified: 27-jul-91.
-;;
-;; The code in this file should always be loaded, because it defines things 
-;; like "defsubst" which should work interpreted as well.  The code in 
-;; bytecomp.el and byte-optimize.el can be loaded as needed.
-;;
-;; This should be loaded by loadup.el or startup.el.  If you can't modify
-;; those files, load this from your .emacs file.  But if you are using
-;; emacs18, this file must be loaded before any .elc files which were
-;; generated by the new compiler without emacs18 compatibility turned on.
-;; If this file is loaded, certain emacs19 binaries will run in emacs18.
-;; Meditate on the meanings of byte-compile-generate-emacs19-bytecodes and
-;; byte-compile-emacs18-compatibility.
+;; Author: Jamie Zawinski <jwz@lucid.com>
+;;	Hallvard Furuseth <hbf@ulrik.uio.no>
+;; Last-Modified: 13 Jul 1992
+;; Keywords: internal
 
-
-;; Copyright (C) 1985, 1986, 1987 Free Software Foundation, Inc.
+;; 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)
+;; the Free Software Foundation; either version 2, or (at your option)
 ;; any later version.
 
 ;; GNU Emacs is distributed in the hope that it will be useful,
@@ -35,81 +23,62 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
-
-;; emacs-18 compatibility.
-
-(if (fboundp 'make-byte-code)
-    nil
-  ;;
-  ;; To avoid compiler bootstrapping problems, this temporary uncompiled
-  ;; make-byte-code is needed to load the compiled one.  Ignore the warnings.
-  (fset 'make-byte-code
-	'(lambda (arglist bytestring constants stackdepth doc)
-	   (list 'lambda arglist doc
-		 (list 'byte-code bytestring constants stackdepth))))
-  ;;
-  ;; Now get a compiled version.
-  (defun make-byte-code (arglist bytestring constants stackdepth
-				 &optional doc &rest interactive)
-    "For compatibility with Emacs19 ``.elc'' files."
-    (nconc (list 'lambda arglist)
-	   ;; #### Removed the (stringp doc) for speed.  Because the V19
-	   ;;	make-byte-code depends on the args being correct, it won't
-	   ;;	help to make a smarter version for V18 alone.
-	   ;;	Btw, it should have been (or (stringp doc) (natnump doc)).  
-	   (if doc (list doc))
-	   (if interactive
-	       (list (cons 'interactive (if (car interactive) interactive))))
-	   (list (list 'byte-code bytestring constants stackdepth)))))
-
+;;; Commentary:
 
 ;;; interface to selectively inlining functions.
 ;;; This only happens when source-code optimization is turned on.
 
+;;; Code:
+
 ;; Redefined in byte-optimize.el.
+;; This is not documented--it's not clear that we should promote it.
 (fset 'inline 'progn)
 (put 'inline 'lisp-indent-hook 0)
 
 
 ;;; Interface to inline functions.
 
-(defmacro proclaim-inline (&rest fns)
-  "Cause the named functions to be open-coded when called from compiled code.
-They will only be compiled open-coded when byte-compile-optimize is true."
-  (cons 'eval-and-compile
-	(mapcar '(lambda (x)
-		   (or (memq (get x 'byte-optimizer)
-			     '(nil byte-compile-inline-expand))
-		       (error
-			"%s already has a byte-optimizer, can't make it inline"
-			x))
-		   (list 'put (list 'quote x)
-			 ''byte-optimizer ''byte-compile-inline-expand))
-		fns)))
+;; (defmacro proclaim-inline (&rest fns)
+;;   "Cause the named functions to be open-coded when called from compiled code.
+;; They will only be compiled open-coded when byte-compile-optimize is true."
+;;   (cons 'eval-and-compile
+;; 	(mapcar '(lambda (x)
+;; 		   (or (memq (get x 'byte-optimizer)
+;; 			     '(nil byte-compile-inline-expand))
+;; 		       (error
+;; 			"%s already has a byte-optimizer, can't make it inline"
+;; 			x))
+;; 		   (list 'put (list 'quote x)
+;; 			 ''byte-optimizer ''byte-compile-inline-expand))
+;; 		fns)))
 
-
-(defmacro proclaim-notinline (&rest fns)
-  "Cause the named functions to no longer be open-coded."
-  (cons 'eval-and-compile
-	(mapcar '(lambda (x)
-		   (if (eq (get x 'byte-optimizer) 'byte-compile-inline-expand)
-		       (put x 'byte-optimizer nil))
-		   (list 'if (list 'eq (list 'get (list 'quote x) ''byte-optimizer)
-				   ''byte-compile-inline-expand)
-			 (list 'put x ''byte-optimizer nil)))
-		fns)))
+;; (defmacro proclaim-notinline (&rest fns)
+;;   "Cause the named functions to no longer be open-coded."
+;;   (cons 'eval-and-compile
+;; 	(mapcar '(lambda (x)
+;; 		   (if (eq (get x 'byte-optimizer) 'byte-compile-inline-expand)
+;; 		       (put x 'byte-optimizer nil))
+;; 		   (list 'if (list 'eq (list 'get (list 'quote x) ''byte-optimizer)
+;; 				   ''byte-compile-inline-expand)
+;; 			 (list 'put x ''byte-optimizer nil)))
+;; 		fns)))
 
 ;; This has a special byte-hunk-handler in bytecomp.el.
 (defmacro defsubst (name arglist &rest body)
-  "Same syntax as defun, but the defined function will always be open-coded,
-so long as byte-compile-optimize is true."
+  "Define an inline function.  The syntax is just like that of `defun'."
+  (or (memq (get name 'byte-optimizer)
+	    '(nil byte-compile-inline-expand))
+      (error "`%s' is a primitive" name))
   (list 'prog1
 	(cons 'defun (cons name (cons arglist body)))
-	(list 'proclaim-inline name)))
+	(list 'eval-and-compile
+	      (list 'put (list 'quote name)
+		    ''byte-optimizer ''byte-compile-inline-expand))))
 
 (defun make-obsolete (fn new)
-  "Make the byte-compiler warn that FUNCTION is obsolete and NEW should be
-used instead.  If NEW is a string, that is the `use instead' message."
+  "Make the byte-compiler warn that FUNCTION is obsolete.
+The warning will say that NEW should be used instead.
+If NEW is a string, that is the `use instead' message."
   (interactive "aMake function obsolete: \nxObsoletion replacement: ")
   (let ((handler (get fn 'byte-compile)))
     (if (eq 'byte-compile-obsolete handler)
@@ -120,7 +89,7 @@
 
 (put 'dont-compile 'lisp-indent-hook 0)
 (defmacro dont-compile (&rest body)
-  "Like progn, but the body will always run interpreted (not compiled)."
+  "Like `progn', but the body always runs interpreted (not compiled)."
   (list 'eval (list 'quote (if (cdr body) (cons 'progn body) (car body)))))
 
 
@@ -131,43 +100,48 @@
 
 (put 'eval-when-compile 'lisp-indent-hook 0)
 (defmacro eval-when-compile (&rest body)
-  "Like progn, but evaluates the body at compile-time.  The result of the
-body appears to the compiler as a quoted constant."
+  "Like `progn', but evaluates the body at compile time.
+The result of the body appears to the compiler as a quoted constant."
   ;; Not necessary because we have it in b-c-initial-macro-environment
   ;; (list 'quote (eval (cons 'progn body)))
   (cons 'progn body))
 
 (put 'eval-and-compile 'lisp-indent-hook 0)
 (defmacro eval-and-compile (&rest body)
-  "Like progn, but evaluates the body at compile-time as well as at load-time."
+  "Like `progn', but evaluates the body at compile time and at load time."
   ;; Remember, it's magic.
   (cons 'progn body))
 
 
-;;; Interface to file-local byte-compiler parameters.
-;;; Redefined in bytecomp.el.
-
-(put 'byte-compiler-options 'lisp-indent-hook 0)
-(defmacro byte-compiler-options (&rest args)
-  "Set some compilation-parameters for this file.  This will affect only the
-file in which it appears; this does nothing when evaluated, and when loaded
-from a .el file.
-
-Each argument to this macro must be a list of a key and a value.
-
-  Keys:		  Values:		Corresponding variable:
+;;; I nuked this because it's not a good idea for users to think of using it.
+;;; These options are a matter of installation preference, and have nothing to
+;;; with particular source files; it's a mistake to suggest to users
+;;; they should associate these with particular source files.
+;;; There is hardly any reason to change these parameters, anyway.
+;;; --rms.
 
-  verbose	  t, nil		byte-compile-verbose
-  optimize	  t, nil, source, byte	byte-compile-optimize
-  warnings	  list of warnings	byte-compile-warnings
-		      Legal elements: (callargs redefine free-vars unresolved)
-  file-format	  emacs18, emacs19	byte-compile-emacs18-compatibility
-  new-bytecodes	  t, nil		byte-compile-generate-emacs19-bytecodes
+;; (put 'byte-compiler-options 'lisp-indent-hook 0)
+;; (defmacro byte-compiler-options (&rest args)
+;;   "Set some compilation-parameters for this file.  This will affect only the
+;; file in which it appears; this does nothing when evaluated, and when loaded
+;; from a .el file.
+;; 
+;; Each argument to this macro must be a list of a key and a value.
+;; 
+;;   Keys:		  Values:		Corresponding variable:
+;; 
+;;   verbose	  t, nil		byte-compile-verbose
+;;   optimize	  t, nil, source, byte	byte-compile-optimize
+;;   warnings	  list of warnings	byte-compile-warnings
+;; 		      Legal elements: (callargs redefine free-vars unresolved)
+;;   file-format	  emacs18, emacs19	byte-compile-compatibility
+;; 
+;; For example, this might appear at the top of a source file:
+;; 
+;;     (byte-compiler-options
+;;       (optimize t)
+;;       (warnings (- free-vars))		; Don't warn about free variables
+;;       (file-format emacs19))"
+;;   nil)
 
-For example, this might appear at the top of a source file:
-
-    (byte-compiler-options
-      (optimize t)
-      (warnings (- free-vars))		; Don't warn about free variables
-      (file-format emacs19))"
-  nil)
+;;; byte-run.el ends here
--- a/lisp/calendar/calendar.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/calendar/calendar.el	Fri Jul 17 08:15:29 1992 +0000
@@ -1,4 +1,11 @@
 ;;; calendar.el --- Calendar functions.
+
+;; Author: Edward M. Reingold <reingold@cs.uiuc.edu>
+;; Last-Modified: 30 Jun 1992
+;; Keyword: calendar
+
+(defconst calendar-version "Version 4.02, released June 14, 1992")
+
 ;;; Copyright (C) 1988, 1989, 1990, 1991 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -18,6 +25,8 @@
 ;; file named COPYING.  Among other things, the copyright notice
 ;; and this notice must be preserved on all copies.
 
+;;; Commentary:
+
 ;; This collection of functions implements a calendar window.  It generates
 ;; generates a calendar for the current month, together with the previous and
 ;; coming months, or for any other three-month period.  The calendar can be
@@ -66,7 +75,7 @@
 ;; Software--Practice and Experience, Volume 20, Number 9 (September, 1990),
 ;; pages 899-928.
 
-(defconst calendar-version "Version 4.02, released June 14, 1992")
+;;; Code:
 
 (defvar view-diary-entries-initially nil
   "*If T, the diary entries for the current date will be displayed on entry.
@@ -996,7 +1005,7 @@
      (if today-visible today (list displayed-month 1 displayed-year)))
     (set-buffer-modified-p nil)
     (or (one-window-p t)
-        (/= (screen-width) (window-width))
+        (/= (frame-width) (window-width))
         (shrink-window (- (window-height) 9)))
     (sit-for 0)
     (and mark-holidays-in-calendar
--- a/lisp/calendar/holidays.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/calendar/holidays.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Author: Edward M. Reingold <reingold@cs.uiuc.edu>
 ;; Last-Modified: 14 Jul 1992
+;; Keywords: calendar
 
 ;;; Copyright (C) 1989, 1990 Free Software Foundation, Inc.
 
--- a/lisp/cmuscheme.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/cmuscheme.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Author: Olin Shivers <olin.shivers@cs.cmu.edu>
 ;; Last-Modified: 16 Mar 1992
+;; Keyword: processes, lisp
 
 ;;; Copyright Olin Shivers (1988)
 ;;; Please imagine a long, tedious, legalistic 5-page gnu-style copyright
--- a/lisp/comint.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/comint.el	Fri Jul 17 08:15:29 1992 +0000
@@ -3,6 +3,7 @@
 ;; Maintainer: Olin Shivers <shivers@cs.cmu.edu>
 ;; Last-Modified: 16 Jul 1992
 ;; Version: 2.03
+;; Keyword: estensions, processes
 
 ;;; Copyright Olin Shivers (1988).
 
--- a/lisp/diff.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/diff.el	Fri Jul 17 08:15:29 1992 +0000
@@ -4,6 +4,7 @@
 ;; Maintainer: FSF
 ;; Created: 27 Jan 1989
 ;; Last-Modified: 21 Dec 1992
+;; Keyword: unix, tools
 
 ;; Copyright (C) 1990 Free Software Foundation, Inc.
 
--- a/lisp/ehelp.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/ehelp.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 16 Mar 1992
+;; Keywords: help, extensions
 
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 
--- a/lisp/electric.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/electric.el	Fri Jul 17 08:15:29 1992 +0000
@@ -3,6 +3,7 @@
 ;; Author: K. Shane Hartman
 ;; Maintainer: FSF
 ;; Last-Modified: 09 Jun 1992
+;; Keywords: extensions
 
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
--- a/lisp/emacs-lisp/autoload.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/emacs-lisp/autoload.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Author: Roland McGrath <roland@gnu.ai.mit.edu>
 ;; Last-Modified: 24 Jun 1992
+;; Keyword: internal
 
 ;;; Copyright (C) 1991, 1992 Free Software Foundation, Inc.
 ;;;
--- a/lisp/emacs-lisp/backquote.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/emacs-lisp/backquote.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Author: Dick King (king@kestrel).
 ;; Last-Modified: 16 Mar 1992
+;; Keywords: extensions
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
--- a/lisp/emacs-lisp/cl-indent.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/emacs-lisp/cl-indent.el	Fri Jul 17 08:15:29 1992 +0000
@@ -3,6 +3,7 @@
 ;; Author: Richard Mlynark <mly@eddie.mit.edu>
 ;; Maintainer: FSF
 ;; Last-Modified: 09 May 1991
+;; Keywords: lisp, tools
 
 ;; Copyright (C) 1987 Free Software Foundation, Inc.
 ;; Written by Richard Mlynarik July 1987
--- a/lisp/emacs-lisp/cust-print.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/emacs-lisp/cust-print.el	Fri Jul 17 08:15:29 1992 +0000
@@ -1,9 +1,10 @@
-;; cus-print.el -- handles print-level and print-circle.
+;; cust-print.el -- handles print-level and print-circle.
 
 ;; Author: Daniel LaLiberte <liberte@cs.uiuc.edu>
 ;; Version: 1.0
 ;; Last-Modified: 17 Mar 1992
 ;; Adapted-By: ESR
+;; Keyword: extensions
 
 ;; Copyright (C) 1992 Free Software Foundation, Inc.
 
@@ -569,4 +570,4 @@
  (uninstall-custom-print-funcs)
  )
 
-;;; cus-print.el ends here
+;;; cust-print.el ends here
--- a/lisp/emacs-lisp/debug.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/emacs-lisp/debug.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 08 Jan 1992
+;; Keyword: lisp, tools
 
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
--- a/lisp/emacs-lisp/disass.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/emacs-lisp/disass.el	Fri Jul 17 08:15:29 1992 +0000
@@ -1,9 +1,12 @@
-;;; Disassembler for compiled Emacs Lisp code
+;;; disass.el --- disassembler for compiled Emacs Lisp code
+
+;; Author: Doug Cutting <doug@csli.stanford.edu>
+;;	Jamie Zawinski <jwz@lucid.com>
+;; Maintainer: Jamie Zawinski <jwz@lucid.com>
+;; Last-Modified: 22 Oct 91
+;; Keyword: internal
+
 ;;; Copyright (C) 1986, 1991 Free Software Foundation, Inc.
-;;; Original version by Doug Cutting (doug@csli.stanford.edu)
-;;; Substantially modified by Jamie Zawinski <jwz@lucid.com> for
-;;; the new lapcode-based byte compiler.
-;;; Last modified 22-oct-91.
 
 ;; This file is part of GNU Emacs.
 
@@ -21,6 +24,13 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;;; Commentary:
+
+;;; Original version by Doug Cutting (doug@csli.stanford.edu)
+;;; Substantially modified by Jamie Zawinski <jwz@lucid.com> for
+;;; the new lapcode-based byte compiler.
+
+;;; Code:
 
 ;;; The variable byte-code-vector is defined by the new bytecomp.el.
 ;;; The function byte-decompile-lapcode is defined in byte-opt.el.
@@ -223,3 +233,5 @@
 	  (insert "\n"))
 	(setq lap (cdr lap)))))
   nil)
+
+;;; disass.el ends here
--- a/lisp/emacs-lisp/float.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/emacs-lisp/float.el	Fri Jul 17 08:15:29 1992 +0000
@@ -3,6 +3,7 @@
 ;; Author: Bill Rosenblatt
 ;; Maintainer: FSF
 ;; Last-Modified: 16 Mar 1992
+;; Keywords: extensions
 
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 
--- a/lisp/emacs-lisp/helper.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/emacs-lisp/helper.el	Fri Jul 17 08:15:29 1992 +0000
@@ -3,6 +3,7 @@
 ;; Author: K. Shane Hartman
 ;; Maintainer: FSF
 ;; Last-Modified: 16 Mar 1991
+;; Keywords: help
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
--- a/lisp/emacs-lisp/lisp-mode.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/emacs-lisp/lisp-mode.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 03 Jun 1992
+;; Keywords: lisp, languages
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
--- a/lisp/emacs-lisp/lisp.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/emacs-lisp/lisp.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 12 Mar 1992
+;; Keyword: lisp, languages
 
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
--- a/lisp/emacs-lisp/ring.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/emacs-lisp/ring.el	Fri Jul 17 08:15:29 1992 +0000
@@ -1,12 +1,16 @@
 ;;; ring.el --- handle rings of marks
 
+;; Maintainer: FSF
+;; Last-Modified: 22 Apr 1991
+;; Keywords: extensions
+
 ;; 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)
+;; the Free Software Foundation; either version 2, or (at your option)
 ;; any later version.
 
 ;; GNU Emacs is distributed in the hope that it will be useful,
@@ -18,6 +22,8 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;;; Commentary:
+
 ;;; This code defines a ring data structure. A ring is a 
 ;;;     (hd-index tl-index . vector) 
 ;;; list. You can insert to, remove from, and rotate a ring. When the ring
@@ -29,6 +35,8 @@
 ;;; These functions are used by the input history mechanism, but they can
 ;;; be used for other purposes as well.
 
+;;; Code:
+
 (provide 'history)
 
 (defun ring-p (x) 
--- a/lisp/emulation/edt.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/emulation/edt.el	Fri Jul 17 08:15:29 1992 +0000
@@ -4,6 +4,7 @@
 ;; Maintainer: FSF
 ;; Created: 27 Aug 1986
 ;; Last-Modified: 09 May 1991
+;; Keywords: emulations
 
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 ;;  It started from public domain code by Mike Clarkson
--- a/lisp/emulation/mlconvert.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/emulation/mlconvert.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 09 May 1991
+;; Keywords: extensions
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
--- a/lisp/emulation/mlsupport.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/emulation/mlsupport.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 16 Mar 1992
+;; Keywords: extensions
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
--- a/lisp/find-dired.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/find-dired.el	Fri Jul 17 08:15:29 1992 +0000
@@ -4,6 +4,7 @@
 ;;	Sebastian Kremer <sk@thp.uni-koeln.de>
 ;; Maintainer: Roland McGrath <roland@gnu.ai.mit.edu>
 ;; Last-Modified: 16 Mar 1992
+;; Keywords: unix
 
 (defconst find-dired-version (substring "$Revision: 1.9 $" 11 -2)
   "$Id: find-dired.el,v 1.9 1991/11/11 13:24:31 sk Exp $")
--- a/lisp/flow-ctrl.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/flow-ctrl.el	Fri Jul 17 08:15:29 1992 +0000
@@ -4,6 +4,7 @@
 ;; Maintainer: FSF
 ;; Last-Modified: 03 Jun 1992
 ;; Adapted-By: ESR
+;; Keywords: hardware
 
 ;;; Copyright (C) 1990 Free Software Foundation, Inc.
 ;;; Copyright (C) 1991 Kevin Gallagher
--- a/lisp/frame.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/frame.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 09 Jul 92
+;; Keywords: internal
 
 ;;;; Copyright (C) 1990, 1992 Free Software Foundation, Inc.
 
--- a/lisp/help.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/help.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 30 Jun 1992
+;; Keywords: help, internal
 
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
--- a/lisp/info.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/info.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 30 Jun 1992
+;; Keywords: help
 
 ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc.
 
--- a/lisp/informat.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/informat.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 09 May 1991
+;; Keywords: help
 
 ;; Copyright (C) 1986 Free Software Foundation, Inc.
 
--- a/lisp/ledit.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/ledit.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 13 May 1991
+;; Keyord: languages
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
--- a/lisp/loadup.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/loadup.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 14 Jul 1992
+;; Keywords: internal
 
 ;; This is loaded into a bare Emacs to make a dumpable one.
 ;; Copyright (C) 1985, 1986, 1992 Free Software Foundation, Inc.
--- a/lisp/lpr.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/lpr.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 19 Apr 1992
+;; Keywords: unix
 
 ;; Copyright (C) 1985, 1988, 1992 Free Software Foundation, Inc.
 
--- a/lisp/mail/mail-utils.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/mail/mail-utils.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 16 Mar 1992
+;; Keywords: mail, news
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
--- a/lisp/mail/mailabbrev.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/mail/mailabbrev.el	Fri Jul 17 08:15:29 1992 +0000
@@ -4,6 +4,7 @@
 ;;	Roland McGrath <roland@gnu.ai.mit.edu>
 ;; Created: 19 Oct 90
 ;; Last-Modified: 13 Jun 92
+;; Keywords: mail
 
 ;;; ??? We must get papers for this or delete it.
 ;;; Copyright (C) 1985, 1986, 1987, 1992 Free Software Foundation, Inc.
--- a/lisp/mail/mailalias.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/mail/mailalias.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 01 Jun 1992
+;; Keywords: mail
 
 ;; Copyright (C) 1985, 1987 Free Software Foundation, Inc.
 
--- a/lisp/mail/mailpost.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/mail/mailpost.el	Fri Jul 17 08:15:29 1992 +0000
@@ -4,6 +4,7 @@
 ;; Maintainer: FSF
 ;; Created: 13 Jan 1986
 ;; Last-Modified: 30 May 1992
+;; Keywords: mail
 
 ;; This is in the public domain
 ;; since Delp distributed it without a copyright notice in 1986.
--- a/lisp/makesum.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/makesum.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 09 May 1991
+;; Keywords: help
 
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
--- a/lisp/map-ynp.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/map-ynp.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Author: Roland McGrath <roland@gnu.ai.mit.edu>
 ;; Last-Modified: 14 Mar 1992
+;; Keywords: lisp, extensions
 
 ;;; Copyright (C) 1991, 1992 Free Software Foundation, Inc.
 ;;;
--- a/lisp/play/life.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/play/life.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Author: Kyle Jones <talos!kjones@uunet.uu.net>
 ;; Last-Modified: 16 Mar 1992
+;; Keyword: games
 
 ;; Copyright (C) 1988 Free Software Foundation, Inc.
 
--- a/lisp/play/meese.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/play/meese.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 20 May 1988
+;; Keywords: games
 
 (defun protect-innocence-hook ()
   (if (and (equal (file-name-nondirectory buffer-file-name) "sex.6")
--- a/lisp/progmodes/awk-mode.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/progmodes/awk-mode.el	Fri Jul 17 08:15:29 1992 +0000
@@ -1,12 +1,16 @@
 ;;; awk-mode.el --- AWK code editing commands for Emacs
 
+;; Maintainer: FSF
+;; Last-Modified: 09 May 1991
+;; Keyword: unix, languages
+
 ;; Copyright (C) 1988 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)
+;; the Free Software Foundation; either version 2, or (at your option)
 ;; any later version.
 
 ;; GNU Emacs is distributed in the hope that it will be useful,
@@ -18,6 +22,7 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;;; Code:
 
 (defvar awk-mode-syntax-table nil
   "Syntax table in use in Awk-mode buffers.")
--- a/lisp/progmodes/compile.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/progmodes/compile.el	Fri Jul 17 08:15:29 1992 +0000
@@ -3,6 +3,7 @@
 ;; Author: Roland McGrath <roland@prep.ai.mit.edu>
 ;; Maintainer: FSF
 ;; Last-Modified: 05 Jul 1992
+;; Keyword: tools, processes
 
 ;;;!!! dup removal is broken.
 
--- a/lisp/progmodes/fortran.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/progmodes/fortran.el	Fri Jul 17 08:15:29 1992 +0000
@@ -4,6 +4,7 @@
 ;; Maintainer: bug-fortran-mode@erl.mit.edu
 ;; Version 1.28.3
 ;; Last-Modified: 15 Jul 1991
+;; Keywords: languages
 
 ;;; Copyright (c) 1991 Free Software Foundation, Inc.
 
--- a/lisp/progmodes/hideif.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/progmodes/hideif.el	Fri Jul 17 08:15:29 1992 +0000
@@ -1,7 +1,8 @@
 ;;; hide-ifdef-mode.el --- hides selected code within ifdef.
 
-;;; Author: Dan LaLiberte <liberte@a.cs.uiuc.edu>
-;;; Last-Modified: 06 Mar 1991
+;; Author: Dan LaLiberte <liberte@a.cs.uiuc.edu>
+;; Last-Modified: 06 Mar 1991
+;; Keywords: c
 
 ;;; $Header: hide-ifdef-mode.el,v 1.7 88/02/16 03:12:58 liberte Exp $
 
--- a/lisp/progmodes/icon.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/progmodes/icon.el	Fri Jul 17 08:15:29 1992 +0000
@@ -3,6 +3,7 @@
 ;; Author: Chris Smith <convex!csmith>
 ;; Created: 15 Feb 89
 ;; Last-Modified: 06 Mar 1991
+;; Keywords: languages
 
 ;; Copyright (C) 1989 Free Software Foundation, Inc.
 
--- a/lisp/progmodes/inf-lisp.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/progmodes/inf-lisp.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Author: Olin Shivers <shivers@cs.cmu.edu>
 ;; Last-Modified: 16 Jul 1993
+;; Keyword: processes, lisp
 
 ;;; Copyright Olin Shivers (1988).
 ;;; Please imagine a long, tedious, legalistic 5-page gnu-style copyright
--- a/lisp/progmodes/make-mode.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/progmodes/make-mode.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,7 +2,7 @@
 
 ;; Author: Thomas Neumann <tom@smart.bo.open.de>
 ;; Adapted-By: ESR
-;; Keywords: unix tools
+;; Keywords: unix, tools
 
 ;; $Id: makefile.el,v 1.7.1.17 1992/07/15 20:05:15 tom Exp tom $
 
--- a/lisp/progmodes/modula2.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/progmodes/modula2.el	Fri Jul 17 08:15:29 1992 +0000
@@ -3,6 +3,7 @@
 ;; Author: Michael Schmidt <michael@pbinfo.UUCP> 
 ;;	Tom Perrine <Perrin@LOGICON.ARPA>
 ;; Last-Modified: 30 May 1992 
+;; Keywords: languages
 
 ;; The authors distributed this without a copyright notice
 ;; back in 1988, so it is in the public domain.  The original included
--- a/lisp/textmodes/fill.el	Fri Jul 17 07:10:46 1992 +0000
+++ b/lisp/textmodes/fill.el	Fri Jul 17 08:15:29 1992 +0000
@@ -2,6 +2,7 @@
 
 ;; Maintainer: FSF
 ;; Last-Modified: 24 Jun 1992
+;; Keywords: wp
 
 ;; Copyright (C) 1985, 1986, 1992 Free Software Foundation, Inc.