Fix a "off-by-one" thinko, database indexes are zero based.

diff --git a/chess-test.el b/chess-test.el
index c54b91b737002c946c71e9af0f6498fba5d7d2cf..cf681e3dccaacbe4f129b10877ce41e8d5fc2ed5 100644 (file)
--- a/chess-test.el
+++ b/chess-test.el
@@ -26,8 +26,8 @@
          (let* ((db-count (chess-database-count database))
                 (ply-count 0)
                 (index (if start
-                           (max start 1)
-                         1))
+                           (1- start)
+                         0))
                 (last-index (if (and count (> count 0))
                                 (min db-count (+ index count))
                               db-count))