summaryrefslogtreecommitdiff
path: root/chess-ply.el
diff options
context:
space:
mode:
Diffstat (limited to 'chess-ply.el')
-rw-r--r--chess-ply.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/chess-ply.el b/chess-ply.el
index 1d42f53..f44553b 100644
--- a/chess-ply.el
+++ b/chess-ply.el
@@ -248,7 +248,8 @@ maneuver."
(let ((target (or pos (chess-incr-index candidate rank-adj file-adj))))
(if (and (or (not specific-target)
(= target specific-target))
- (chess-pos-legal-moves position color target candidate))
+ (chess-pos-legal-moves position color target
+ (list candidate)))
(if chess-ply-throw-if-any
(throw 'any-found t)
(let ((ply (chess-ply-create position t candidate target)))