More UCI engines: fruit and glaurung.

1 files changed, 5 insertions, 2 deletions

diff --git a/chess.el b/chess.el
index da0a452..541715d 100644
--- a/chess.el
+++ b/chess.el
@@ -107,7 +107,10 @@ These can do just about anything."
   :group 'chess)
 
 (defcustom chess-default-engine
-  '(chess-crafty chess-gnuchess chess-phalanx chess-ai)
+  '(chess-crafty
+    chess-stockfish chess-glaurung chess-fruit
+    chess-gnuchess chess-phalanx
+    chess-ai)
   "Default engine to be used when starting a chess session.
 A list indicates a series of alternatives if the first engine is not
 available."
@@ -158,7 +161,7 @@ If an element of MODULE-LIST is a sublist, treat it as alternatives."
 	  (while module
 	    (if (setq object (condition-case nil
 				 (apply create-func (car module) args)
-			       ((error nil))))
+			       (error nil)))
 		(progn
 		  (push object objects)
 		  (setq module nil))