From e9f978733b11a619e0bf865653865ffaa07076b5 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Wed, 10 Apr 2002 23:09:06 +0000 Subject: *** no comment *** --- chess-engine.el | 12 +++++++----- 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)))))) -- cgit v1.2.3