Added autoloads for RMAIL Summary mode.
authorBrian A. LaMacchia <edu/mit/csail/zurich/bal>
Tue, 6 Aug 1991 22:39:52 +0000 (22:39 +0000)
committerBrian A. LaMacchia <edu/mit/csail/zurich/bal>
Tue, 6 Aug 1991 22:39:52 +0000 (22:39 +0000)
v7/src/edwin/loadef.scm

index c389113f9371ccf87a9d8c21ba57b9d88babc254..6e2786fa3c43d439cda20acccba5a96fb0e4e0a3 100644 (file)
@@ -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
 ;;;
 \f
 ;;;; 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))