summaryrefslogtreecommitdiff
path: root/chess-ply.el
diff options
context:
space:
mode:
Diffstat (limited to 'chess-ply.el')
-rw-r--r--chess-ply.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/chess-ply.el b/chess-ply.el
index 6b810d4..f5261b9 100644
--- a/chess-ply.el
+++ b/chess-ply.el
@@ -68,7 +68,9 @@
(chess-ply-changes ply)))
(defsubst chess-ply-create (position &rest changes)
- (cons position changes))
+ ;; jww (2002-04-02): if changes is a castling maneuver, then
+ ;; annotate and extend the ply correctly
+ (cons (chess-pos-copy position) changes))
(defun chess-legal-plies (position &optional search-func)
"Return a list of all legal plies in POSITION."