diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-17 01:33:42 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-17 01:33:42 +0000 |
| commit | 4d1c4c72b5a9c2c0180531246389a452fc034bc8 (patch) | |
| tree | 451683c6b2afe9808a468e74446b828f7809e2c6 /chess-ply.el | |
| parent | 0a7853b21f28d776e51b70a843fea57681ace069 (diff) | |
*** no comment ***
Diffstat (limited to 'chess-ply.el')
| -rw-r--r-- | chess-ply.el | 3 |
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))) |