changeset 29056:abee88aa37f0

(brief-mode): New alias.
author Dave Love <fx@gnu.org>
date Sun, 21 May 2000 17:33:05 +0000
parents 661c97b907a8
children 9b29679df993
files lisp/emulation/crisp.el
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emulation/crisp.el	Sun May 21 17:29:50 2000 +0000
+++ b/lisp/emulation/crisp.el	Sun May 21 17:33:05 2000 +0000
@@ -351,7 +351,7 @@
 
 ;;;###autoload
 (defun crisp-mode (&optional arg)
-  "Toggle CRiSP emulation minor mode.
+  "Toggle CRiSP/Brief emulation minor mode.
 With ARG, turn CRiSP mode on if ARG is positive, off otherwise."
   (interactive "P")
   (setq crisp-mode (if (null arg)
@@ -371,6 +371,10 @@
 	(define-key crisp-mode-map [(meta f1)] 'scroll-all-mode))
     (run-hooks 'crisp-mode-hook)))
 
+;; People might use Apropos on `brief'.
+;;;###autoload
+(defalias 'brief-mode 'crisp-mode)
+
 (if (fboundp 'add-minor-mode)
     (add-minor-mode 'crisp-mode 'crisp-mode-modeline-string
 		    crisp-mode-map nil 'crisp-mode)