Mercurial > emacs
diff lisp/emulation/crisp.el @ 29056:abee88aa37f0
(brief-mode): New alias.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Sun, 21 May 2000 17:33:05 +0000 |
| parents | 47cdb31c3a62 |
| children | 0d8b17d428b5 |
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)