diff options
| author | Roland McGrath | 1993-08-03 21:38:31 +0000 |
|---|---|---|
| committer | Roland McGrath | 1993-08-03 21:38:31 +0000 |
| commit | d6bd8dca5d45ed3afdf1b172f1af559a85e7d750 (patch) | |
| tree | 6ec8172208b5ac9b562f59f7b22055423cff5d27 | |
| parent | cac0b95d130d719a50ea951e368b07d6b2d88077 (diff) | |
| download | emacs-d6bd8dca5d45ed3afdf1b172f1af559a85e7d750.tar.gz emacs-d6bd8dca5d45ed3afdf1b172f1af559a85e7d750.zip | |
(compilation-minor-mode): Make variable buffer-local.
(compilation-minor-mode): Autoload this function.
| -rw-r--r-- | lisp/progmodes/compile.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index 867c06c600e..1eef0ed2605 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el | |||
| @@ -391,6 +391,7 @@ Runs `compilation-mode-hook' with `run-hooks' (which see)." | |||
| 391 | "Non-nil when in compilation-minor-mode. | 391 | "Non-nil when in compilation-minor-mode. |
| 392 | In this minor mode, all the error-parsing commands of the | 392 | In this minor mode, all the error-parsing commands of the |
| 393 | Compilation major mode are available.") | 393 | Compilation major mode are available.") |
| 394 | (make-variable-buffer-local 'compilation-minor-mode) | ||
| 394 | 395 | ||
| 395 | (or (assq 'compilation-minor-mode minor-mode-alist) | 396 | (or (assq 'compilation-minor-mode minor-mode-alist) |
| 396 | (setq minor-mode-alist (cons '(compilation-minor-mode " Compilation") | 397 | (setq minor-mode-alist (cons '(compilation-minor-mode " Compilation") |
| @@ -400,6 +401,7 @@ Compilation major mode are available.") | |||
| 400 | compilation-minor-mode-map) | 401 | compilation-minor-mode-map) |
| 401 | minor-mode-map-alist))) | 402 | minor-mode-map-alist))) |
| 402 | 403 | ||
| 404 | ;;;###autoload | ||
| 403 | (defun compilation-minor-mode (&optional arg) | 405 | (defun compilation-minor-mode (&optional arg) |
| 404 | "Toggle compilation minor mode. | 406 | "Toggle compilation minor mode. |
| 405 | With arg, turn compilation mode on if and only if arg is positive. | 407 | With arg, turn compilation mode on if and only if arg is positive. |