nicer messages.
This commit is contained in:
parent
983059101c
commit
935c51eb1c
@ -215,8 +215,8 @@
|
|||||||
(let* ((name ghc-process-process-name)
|
(let* ((name ghc-process-process-name)
|
||||||
(cpro (if name (get-process name))))
|
(cpro (if name (get-process name))))
|
||||||
(if (not cpro)
|
(if (not cpro)
|
||||||
(message "No process")
|
(message "No ghc-mod process")
|
||||||
(delete-process cpro)
|
(delete-process cpro)
|
||||||
(message "A process was killed"))))
|
(message "ghc-mod process was killed"))))
|
||||||
|
|
||||||
(provide 'ghc-process)
|
(provide 'ghc-process)
|
||||||
|
Loading…
Reference in New Issue
Block a user