branch: elpa/forth-mode
commit 399fd00921a01d1ce16c63c0901052456779025d
Author: Lars Brinkhoff <[email protected]>
Commit: Lars Brinkhoff <[email protected]>
Fix killing interactive Forth.
---
forth-interaction-mode.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/forth-interaction-mode.el b/forth-interaction-mode.el
index 132eccb398..ac46be8e7b 100644
--- a/forth-interaction-mode.el
+++ b/forth-interaction-mode.el
@@ -25,7 +25,8 @@
(defun forth-kill (&optional buffer)
(interactive)
(setq buffer (or buffer (current-buffer)))
- (set-process-query-on-exit-flag (get-buffer-process buffer) nil)
+ (when (get-buffer-process buffer)
+ (set-process-query-on-exit-flag (get-buffer-process buffer) nil))
(kill-buffer buffer)
(setq forth-interaction-buffer nil))
