diff options
Diffstat (limited to 'chess-scid.el')
| -rw-r--r-- | chess-scid.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/chess-scid.el b/chess-scid.el index 8da54a7..1881c2a 100644 --- a/chess-scid.el +++ b/chess-scid.el @@ -22,9 +22,10 @@ (chess-scid-send command) (accept-process-output chess-scid-process) (goto-char (point-max)) - (while (memq (char-before) '(? ?\t ?\n ?\r ?\%)) - (backward-char 1)) - (buffer-substring here (point)))) + (skip-chars-backward " \t\n\r%") + (prog1 + (buffer-substring here (point)) + (erase-buffer)))) (defun chess-scid-handler (event &rest args) (cond |