From 660d0b6ac14af2053b7f5bb3218d392a16d04828 Mon Sep 17 00:00:00 2001
From: Mario Lang <mlang@delysid.org>
Date: Mon, 1 Sep 2008 20:31:03 +0200
Subject: Fix a "off-by-one" thinko, database indexes are zero based.

---
 chess-test.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'chess-test.el')

diff --git a/chess-test.el b/chess-test.el
index c54b91b..cf681e3 100644
--- 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))
-- 
cgit v1.2.3