mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-14 09:39:42 +00:00
Code Issues Releases Activity

(compilation-minor-mode): Make variable buffer-local.

Browse Source 
(compilation-minor-mode): Autoload this function.
This commit is contained in:
Roland McGrath 1993-08-03 21:38:31 +00:00
parent cac0b95d13
commit d6bd8dca5d
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/progmodes/compile.el
View File

@ -391,6 +391,7 @@ Runs `compilation-mode-hook' with `run-hooks' (which see)."
"Non-nil when in compilation-minor-mode. "Non-nil when in compilation-minor-mode.
In this minor mode, all the error-parsing commands of the In this minor mode, all the error-parsing commands of the
Compilation major mode are available.") Compilation major mode are available.")
(make-variable-buffer-local 'compilation-minor-mode)
(or (assq 'compilation-minor-mode minor-mode-alist) (or (assq 'compilation-minor-mode minor-mode-alist)
(setq minor-mode-alist (cons '(compilation-minor-mode " Compilation") (setq minor-mode-alist (cons '(compilation-minor-mode " Compilation")
@ -400,6 +401,7 @@ Compilation major mode are available.")
compilation-minor-mode-map) compilation-minor-mode-map)
minor-mode-map-alist))) minor-mode-map-alist)))
;;;###autoload
(defun compilation-minor-mode (&optional arg) (defun compilation-minor-mode (&optional arg)
"Toggle compilation minor mode. "Toggle compilation minor mode.
With arg, turn compilation mode on if and only if arg is positive. With arg, turn compilation mode on if and only if arg is positive.