The 'start' parameter passed in is now a 0-based index, like what is expected

by chess-database.el.

diff --git a/chess-test.el b/chess-test.el
index 8df18a92334b11cf3876ae12c2aa251b05d643f2..77fbc6d81211122ab8971736f34e43c593aaaf68 100644 (file)
--- a/chess-test.el
+++ b/chess-test.el
@@ -25,9 +25,7 @@
          (message "Running validation suite...")
          (let* ((db-count (chess-database-count database))
                 (ply-count 0)
-                (index (if start
-                           (1- start)
-                         0))
+                (index (or start 0))
                 (last-index (if (and count (> count 0))
                                 (min db-count (+ index count))
                               db-count))