diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-10 23:09:06 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-10 23:09:06 +0000 |
| commit | e9f978733b11a619e0bf865653865ffaa07076b5 (patch) | |
| tree | 23c0643071b6ff75bef966f320449ba5a03e6b3a | |
| parent | a48ad3aa15ebf6cd2f55923feb7b150bf3c36d7c (diff) | |
*** no comment ***
| -rw-r--r-- | chess-engine.el | 12 | ||||
| -rw-r--r-- | chess-link.el | 3 |
2 files changed, 9 insertions, 6 deletions
diff --git a/chess-engine.el b/chess-engine.el index 0c0afb4..ba85444 100644 --- a/chess-engine.el +++ b/chess-engine.el @@ -61,17 +61,19 @@ (setq chess-engine-position (chess-ply-next-pos ply))))) (defsubst chess-engine-convert-algebraic (move) - (or (chess-algebraic-to-ply (chess-engine-position nil) - move) - (message "Received invalid move string: %s" move))) + (or (chess-algebraic-to-ply (chess-engine-position nil) move) + (ignore + (message "Received invalid move string: %s" move)))) (defsubst chess-engine-convert-fen (fen) (or (chess-fen-to-pos fen) - (message "Received invalid FEN string: %s" fen))) + (ignore + (message "Received invalid FEN string: %s" fen)))) (defsubst chess-engine-convert-pgn (pgn) (or (chess-pgn-to-game pgn) - (message "Received invalid PGN text"))) + (ignore + (message "Received invalid PGN text")))) (defun chess-engine-default-handler (event &rest args) (let ((chess-engine-handling-event t) diff --git a/chess-link.el b/chess-link.el index 9bcb7a7..13a9911 100644 --- a/chess-link.el +++ b/chess-link.el @@ -68,7 +68,8 @@ engine, and the computer the second engine." ;; tell the first engine to start moving (chess-engine-command first-engine 'pass)) - (chess-display-update display t)) + (chess-display-update display) + (chess-display-popup display)) (error (chess-display-destroy display) (error (error-message-string err)))))) |