Emacs: Enable compilation-minor-mode for pony-mode comint buffers

This commit is contained in:
Tom Willemse 2013-04-11 15:31:07 +02:00
parent a55c5dc580
commit 9ab70194a6

View file

@ -602,6 +602,16 @@ Depending on the value of `buffer-narrowed-p'."
(setq eap-music-library "/mnt/music")
(setq eap-playlist-library "~/music/playlists")
;;; Turn on `compilation-minor-mode' whenever `pony-minor-mode' starts
;;; in a `comint-mode' buffer. Since buffers like `*ponymanage*' and
;;; `*ponyserver*' don't have their own specialized modes, but use
;;; `comint-mode' and turn on `pony-minor-mode', and I don't want to
;;; enable `compilation-minor-mode' for *every* `comint-mode' buffer,
;;; we can add a hook that adds a local hook.
(defun turn-on-compilation-for-pony ()
(add-hook 'pony-minor-mode-hook 'compilation-minor-mode nil t))
(add-hook 'comint-mode-hook 'turn-on-compilation-for-pony)
;;; Finally, load any `customize' settings and slime.
(load custom-file)
(load (expand-file-name "~/quicklisp/slime-helper.el"))