summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--chess-engine.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/chess-engine.el b/chess-engine.el
index f745ced..3621496 100644
--- a/chess-engine.el
+++ b/chess-engine.el
@@ -265,7 +265,8 @@
(unless (memq (process-status proc) '(run open))
(chess-error 'failed-engine-start))
(setq chess-engine-process proc)
- (set-process-filter proc 'chess-engine-filter))
+ (when (not (equal (process-filter proc) 'comint-output-filter))
+ (set-process-filter proc 'chess-engine-filter)))
(setq chess-engine-current-marker (point-marker))
(current-buffer))))))