summaryrefslogtreecommitdiff
path: root/chess-game.el
diff options
context:
space:
mode:
authorJohn Wiegley <johnw@newartisans.com>2002-04-02 08:30:46 +0000
committerJohn Wiegley <johnw@newartisans.com>2002-04-02 08:30:46 +0000
commitf4e9c77bc700222590ada4799c619152354244f2 (patch)
tree1c7d748f0a69f4d80afed3872d44dc37518ef8f2 /chess-game.el
parent682348e8a4a0267bc7a512e4f684f9a50fdff5b1 (diff)
Coded engines as a separate library. Still work to be done here.
Diffstat (limited to 'chess-game.el')
-rw-r--r--chess-game.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/chess-game.el b/chess-game.el
index 034bbe9..1177b18 100644
--- a/chess-game.el
+++ b/chess-game.el
@@ -101,8 +101,9 @@ the game's FEN tag).
SEARCH-FUNC specifies the function used to test the legality of moves.
TAGS is the starting set of game tags (which can always be changed
later using the various tag-related methods)."
- (let ((game (list tags (or search-func
- 'chess-standard-search-position))))
+ (let ((game (list tags
+ (or search-func 'chess-standard-search-position)
+ (or position (chess-pos-create)))))
(dolist (tag (cons (cons "Date" (format-time-string "%Y.%m.%d"))
chess-game-default-tags))
(unless (chess-game-tag game (car tag))