From db29def11f2377e22045dbbfcd1f27bc167026e7 Mon Sep 17 00:00:00 2001
From: 4am <a2_4am@sent.com>
Date: Mon, 19 Nov 2018 20:52:12 -0500
Subject: [PATCH] off-by-1 bug in okvs_get

---
 src/okvs.a | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/src/okvs.a b/src/okvs.a
index a29d27fbe..ca02c17c0 100644
--- a/src/okvs.a
+++ b/src/okvs.a
@@ -208,9 +208,7 @@ okvs_get
          ldy   #0
          lda   (PTR),y
          beq   @fail                 ; no keys, fail immediately
-         tax                         ; X = number of keys
-         inx
-         stx   @maxkeys
+         sta   @maxkeys              ; A = number of keys
          ldx   #0
          jsr   incptr                ; PTR -> first record
          +LDPARAM 3