kill buffer hook run only for haskell-mode.
This commit is contained in:
parent
ad5a343d2e
commit
ac2d8ba134
@ -214,11 +214,12 @@
|
||||
|
||||
(defun ghc-kill-process ()
|
||||
(interactive)
|
||||
(when (eq major-mode 'haskell-mode)
|
||||
(let* ((name ghc-process-process-name)
|
||||
(cpro (if name (get-process name))))
|
||||
(if (not cpro)
|
||||
(message "No ghc-mod process")
|
||||
(delete-process cpro)
|
||||
(message "ghc-mod process was killed"))))
|
||||
(message "ghc-mod process was killed")))))
|
||||
|
||||
(provide 'ghc-process)
|
||||
|
Loading…
Reference in New Issue
Block a user