From b81694cba75b72dd0ab63c05c5bab6519c23f4dc Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Mon, 8 Apr 2002 07:41:57 +0000 Subject: *** no comment *** --- chess.el | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'chess.el') diff --git a/chess.el b/chess.el index e0125ce..4f9e666 100644 --- a/chess.el +++ b/chess.el @@ -107,10 +107,12 @@ a0 243 (chess-display-create chess-default-display t) game) (let ((engine-module (if arg - (intern-soft (read-string "Engine module to play against: ")) + (intern (or (read-string "Engine module to play against: ") + "chess-none")) chess-default-engine))) - (require engine-module) - (chess-engine-set-game (chess-engine-create engine-module) game)))) + (when engine-module + (require engine-module) + (chess-engine-set-game (chess-engine-create engine-module) game))))) (cons display engine))) ;;;###autoload -- cgit v1.2.3