diff options
| author | Mario Lang <mlang@delysid.org> | 2004-01-02 16:10:46 +0000 |
|---|---|---|
| committer | Mario Lang <mlang@delysid.org> | 2004-01-02 16:10:46 +0000 |
| commit | 982430e0d4342e00782df8e20d24b65986fcff87 (patch) | |
| tree | 5b9908f56abd5e1930b7d379a691a90b683f3081 /chess-engine.el | |
| parent | 7ab11b1ac04dd072b2347e6e4a15d34e62416c01 (diff) | |
Insert STRING in chess-engine-send, makes debugging easier
Diffstat (limited to 'chess-engine.el')
| -rw-r--r-- | chess-engine.el | 5 |
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))))) |