summaryrefslogtreecommitdiff
path: root/chess-engine.el
diff options
context:
space:
mode:
Diffstat (limited to 'chess-engine.el')
-rw-r--r--chess-engine.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/chess-engine.el b/chess-engine.el
index f3c2f30..f3c8527 100644
--- a/chess-engine.el
+++ b/chess-engine.el
@@ -367,7 +367,10 @@
(let ((proc chess-engine-process))
(if proc
(if (memq (process-status proc) '(run open))
- (process-send-string proc string)
+ (progn
+ (goto-char (point-max))
+ (insert-before-markers string)
+ (process-send-string proc string))
(chess-message 'engine-not-running)
(chess-engine-command nil 'destroy))
(chess-engine-command nil 'send string)))))