[nongnu] elpa/forth-mode 399fd00921 055/153: Fix killing interactive Forth.

[ELPA Syncer]

branch: elpa/forth-mode
commit 399fd00921a01d1ce16c63c0901052456779025d
Author: Lars Brinkhoff <lars.brinkhoff@delphi.com>
Commit: Lars Brinkhoff <lars.brinkhoff@delphi.com>

    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))