diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-08 08:23:57 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-08 08:23:57 +0000 |
| commit | 610076a57235eaae8b072893b55d67154b5c1ec4 (patch) | |
| tree | 4cc03b14ae6c226bfe6ecfa92b744b8ad9af424e | |
| parent | 4afe8af1c593ca9ee37886b37e1a6fbfaaa7a29a (diff) | |
*** no comment ***
| -rw-r--r-- | chess-ply.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/chess-ply.el b/chess-ply.el index 335519d..d70c455 100644 --- a/chess-ply.el +++ b/chess-ply.el @@ -144,7 +144,7 @@ maneuver." (unless (memq :promote changes) (if (and (= ?p (downcase (chess-pos-piece next-pos (cadr changes)))) - (= (if color 0 7) + (= (if color 7 0) (chess-index-rank (cadr changes)))) (let ((new-piece (completing-read "Promote pawn to queen/rook/knight/bishop? " |