Mercurial > emacs

changeset 787:3cece0106722

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Eric S. Raymond <esr@snark.thyrsus.com>
date Wed, 15 Jul 1992 21:31:44 +0000
parents 22b760626b36
children c8d4eb38ebfc
files lisp/=superyank.el lisp/play/spook.el lisp/play/studly.el lisp/server.el lisp/shell.el lisp/startup.el lisp/subr.el lisp/textmodes/scribe.el lisp/textmodes/spell.el
diffstat 9 files changed, 60 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/=superyank.el	Wed Jul 15 20:52:46 1992 +0000
+++ b/lisp/=superyank.el	Wed Jul 15 21:31:44 1992 +0000
@@ -1,4 +1,11 @@
-;;; superyank.el --- smart message-yanking code for GNUS (Version 1.1)
+;;; superyank.el --- smart message-yanking code for GNUS
+
+;; Author: Barry A. Warsaw <warsaw@cme.nist.gov>
+;; Version: 1.1
+;; Last-Modified: 15 Jul 1992
+;; Adapted-By: ESR
+
+;;; Commentary:
 
 ;; Inserts the message being replied to with various user controlled
 ;; citation styles.
@@ -83,6 +90,9 @@
 ;; 2) reparse nested citations to try to recast as non-nested citations
 ;;    perhaps by checking the References: line
 ;;
+
+;;; Code:
+
 ;; ======================================================================
 ;;
 ;; require and provide features
--- a/lisp/play/spook.el	Wed Jul 15 20:52:46 1992 +0000
+++ b/lisp/play/spook.el	Wed Jul 15 21:31:44 1992 +0000
@@ -1,5 +1,8 @@
 ;;; spook.el --- spook phrase utility for overloading the NSA line eater
 
+;;; Maintainer: FSF
+;;; Last-modified: 05 Dec 1991
+
 ;; Copyright (C) 1988 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -18,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.
 
+;;; Commentary:
 
 ; Steve Strassmann (straz@media-lab.media.mit.edu) didn't write
 ; this, and even if he did, he really didn't mean for you to use it
@@ -36,6 +40,8 @@
 ;  give your message that extra bit of attractiveness for automated
 ;  keyword scanners.
 
+;;; Code:
+
 ; Variables
 (defvar spook-phrases-file (concat data-directory "spook.lines")
    "Keep your favorite phrases here.")
--- a/lisp/play/studly.el	Wed Jul 15 20:52:46 1992 +0000
+++ b/lisp/play/studly.el	Wed Jul 15 21:31:44 1992 +0000
@@ -1,7 +1,12 @@
 ;;; studly.el --- StudlyCaps (tm)(r)(c)(xxx)
+
+;; Maintainer: FSF
+
 ;;; This is in the public domain, since it was distributed
 ;;; by its author without a copyright notice in 1986.
 
+;;; Code:
+
 (defun studlify-region (begin end)
   "Studlify-case the region"
   (interactive "*r")
--- a/lisp/server.el	Wed Jul 15 20:52:46 1992 +0000
+++ b/lisp/server.el	Wed Jul 15 21:31:44 1992 +0000
@@ -1,8 +1,11 @@
 ;;; server.el --- Lisp code for GNU Emacs running as server process.
 
+;; Author: William Sommerfeld <wesommer@athena.mit.edu>
+;; Last-Modified: 5 Dec 1991
+
+;; Changes by peck@sun.com and by rms.
+
 ;; Copyright (C) 1986, 1987 Free Software Foundation, Inc.
-;; Author William Sommerfeld, wesommer@athena.mit.edu.
-;; Changes by peck@sun.com and by rms.
 
 ;; This file is part of GNU Emacs.
 
@@ -20,6 +23,7 @@
 ;; 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 Lisp code is run in Emacs when it is to operate as
 ;;; a server for other processes.
@@ -66,6 +70,8 @@
 ;;; the clients who are waiting for this buffer to be edited.  
 ;;; The global variable "server-clients" lists all the waiting clients,
 ;;; and which files are yet to be edited for each.
+
+;;; Code:
 
 (defvar server-program "emacsserver"
   "*The program to use as the edit server")
--- a/lisp/shell.el	Wed Jul 15 20:52:46 1992 +0000
+++ b/lisp/shell.el	Wed Jul 15 21:31:44 1992 +0000
@@ -1,5 +1,8 @@
 ;;; shell.el --- general command interpreter in a window stuff
 
+;; Author: Olin Shivers <shivers@cs.cmu.edu>
+;; Last-Modified: 16 Mar 1992
+
 ;;; Copyright Olin Shivers (1988).
 
 ;;; This file is part of GNU Emacs.
@@ -18,6 +21,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:
+
 ;;; The changelog is at the end of file.
 
 ;;; Please send me bug reports, bug fixes, and extensions, so that I can
@@ -44,7 +49,6 @@
 ;;; Maybe I should ensure the process mark is in the window when I send
 ;;; text to the process? Switch selectable?
 
-(require 'comint)
 ;; YOUR .EMACS FILE
 ;;=============================================================================
 ;; Some suggestions for your .emacs file.
@@ -136,6 +140,10 @@
 ;;; ===========================================================================
 ;;; 
 
+;;; Code:
+
+(require 'comint)
+
 ;;;###autoload
 (defconst shell-prompt-pattern "^[^#$%>]*[#$%>] *"
   "Regexp to match prompts in the inferior shell.
--- a/lisp/startup.el	Wed Jul 15 20:52:46 1992 +0000
+++ b/lisp/startup.el	Wed Jul 15 21:31:44 1992 +0000
@@ -1,5 +1,8 @@
 ;;; startup.el --- process Emacs shell arguments
 
+;; Maintainer: FSF
+;; Last-Modified: 9 Jul 1992
+
 ;; Copyright (C) 1985, 1986, 1992 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -18,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.
 
+;;; Commentary:
 
 ; These are processed only at the beginning of the argument list.
 ; -batch		execute noninteractively (messages go to stdout,
@@ -48,6 +52,8 @@
 ; file			visit file
 ; -kill			kill (exit) emacs
 
+;;; Code:
+
 (setq top-level '(normal-top-level))
 
 (defvar command-line-processed nil "t once command line has been processed")
--- a/lisp/subr.el	Wed Jul 15 20:52:46 1992 +0000
+++ b/lisp/subr.el	Wed Jul 15 21:31:44 1992 +0000
@@ -1,4 +1,8 @@
 ;;; subr.el --- basic lisp subroutines for Emacs
+
+;; Maintainer: FSF
+;; Last-Modified: 12 Aug 1991
+
 ;;; Copyright (C) 1985, 1986, 1992 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -17,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:
 
 (defun one-window-p (&optional nomini)
   "Returns non-nil if there is only one window.
@@ -351,3 +356,5 @@
 instead of having to write (function (lambda ...)) or '(lambda ...), the
 latter of which won't get byte-compiled."
   (` (function (lambda (,@ cdr)))))
+
+;;; subr.el ends here
--- a/lisp/textmodes/scribe.el	Wed Jul 15 20:52:46 1992 +0000
+++ b/lisp/textmodes/scribe.el	Wed Jul 15 21:31:44 1992 +0000
@@ -1,5 +1,8 @@
 ;;; scribe.el --- scribe mode, and its idiosyncratic commands.
 
+;; Maintainer: FSF
+;; Last-Modified: 9 May 1991
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; This file might become part of GNU Emacs.
@@ -18,6 +21,7 @@
 ;; It should be in a file named COPYING.  Among other things, the
 ;; copyright notice and this notice must be preserved on all copies.
 
+;;; Code:
 
 (defvar scribe-mode-syntax-table nil
   "Syntax table used while in scribe mode.")
--- a/lisp/textmodes/spell.el	Wed Jul 15 20:52:46 1992 +0000
+++ b/lisp/textmodes/spell.el	Wed Jul 15 21:31:44 1992 +0000
@@ -1,5 +1,8 @@
 ;;; spell.el --- spelling correction interface for Emacs.
 
+;; Maintainer: FSF
+;; Last-Modified: 9 May 1991
+
 ;; Copyright (C) 1985 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -18,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:
 
 (defvar spell-command "spell"
   "*Command to run the spell program.")