Make engine searching work again.

2 files changed, 6 insertions, 4 deletions

diff --git a/chess-common.el b/chess-common.el
index f32dcc5..0b258e4 100644
--- a/chess-common.el
+++ b/chess-common.el
@@ -40,7 +40,7 @@
 	   (path (intern (concat "chess-" name "-path")))
 	   proc)
       (chess-message 'starting-engine name)
-      (unless (boundp path)
+      (unless (and (boundp path) (symbol-value path))
 	(chess-error 'could-not-find-engine name path))
       (setq proc (start-process (concat "chess-" name)
 				(current-buffer) (symbol-value path)))
diff --git a/chess.el b/chess.el
index 4d24771..da0a452 100644
--- a/chess.el
+++ b/chess.el
@@ -156,7 +156,9 @@ If an element of MODULE-LIST is a sublist, treat it as alternatives."
 	  ;; this module is actually a list, which means keep trying
 	  ;; until we find one that works
 	  (while module
-	    (if (setq object (apply create-func (car module) args))
+	    (if (setq object (condition-case nil
+				 (apply create-func (car module) args)
+			       ((error nil))))
 		(progn
 		  (push object objects)
 		  (setq module nil))
@@ -209,8 +211,8 @@ Otherwise use `chess-default-engine' to determine the engine."
 					   'chess--create-engine game
 					   engine-response-handler
 					   engine-ctor-args)
-		   ;(error nil))
-		     ))
+		   ;  (error nil))
+	    ))
 	  objects)
 
     (unless (car objects)