From 6b85e99117f3364da7325f46a9fbf66f3cf99a5a Mon Sep 17 00:00:00 2001 From: "Brian A. LaMacchia" Date: Tue, 6 Aug 1991 22:39:52 +0000 Subject: [PATCH] Added autoloads for RMAIL Summary mode. --- v7/src/edwin/loadef.scm | 17 +++++++++++++++-- 1 file changed, 15 insertions(+), 2 deletions(-) diff --git a/v7/src/edwin/loadef.scm b/v7/src/edwin/loadef.scm index c389113f9..6e2786fa3 100644 --- a/v7/src/edwin/loadef.scm +++ b/v7/src/edwin/loadef.scm @@ -1,6 +1,6 @@ ;;; -*-Scheme-*- ;;; -;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/loadef.scm,v 1.8 1991/03/15 23:39:59 cph Exp $ +;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/loadef.scm,v 1.9 1991/08/06 22:39:52 bal Exp $ ;;; ;;; Copyright (c) 1986, 1989-91 Massachusetts Institute of Technology ;;; @@ -48,6 +48,19 @@ ;;;; Major Mode Libraries +(define-library 'RMAIL-SUMMARY-MODE + '("rmailsum" (EDWIN RMAIL))) + +(define-autoload-major-mode 'rmail-summary 'fundamental "RMAIL-Summary" 'RMAIL-SUMMARY-MODE + "Summary mode for RMAIL.") + +(define-autoload-command 'rmail-summary 'RMAIL-SUMMARY-MODE + "Enter RMAIL Summary mode.") + +(define-variable rmail-summary-mode-hook + "An event distributor that is invoked when entering RMAIL Summary mode." + (make-event-distributor)) + (define-library 'MIDAS-MODE '("midas" (EDWIN))) @@ -98,4 +111,4 @@ modified version of TeX input format.") (define-variable texinfo-mode-hook "An event distributor that is invoked when entering Texinfo mode." - (make-event-distributor)) \ No newline at end of file + (make-event-distributor)) -- 2.25.1