From 73ca40409729a9df8c90853e4ba0a367bbf792fc Mon Sep 17 00:00:00 2001
From: Derek Stevens <nilix@nilfm.cc>
Date: Thu, 23 Mar 2023 16:37:20 -0600
Subject: [PATCH] fix off-by-one for read msg

---
 taro-ls.tal | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/taro-ls.tal b/taro-ls.tal
index fdfa38f..4637b58 100644
--- a/taro-ls.tal
+++ b/taro-ls.tal
@@ -246,7 +246,7 @@ JMP2r
 
   READ_MAIL .Console/write DEO
   #0002 SWP .Console/write DEO .Console/write DEO
-  .list LB_SELECT_IDX LDZ2 SWP .Console/write DEO .Console/write DEO
+  .list LB_SELECT_IDX LDZ2 INC2 SWP .Console/write DEO .Console/write DEO
   
 JMP2r
 
@@ -1110,4 +1110,4 @@ JMP2r
 @word $ff
 @selected_mbox "INBOX 00 $f9 ( default mailbox is INBOX, total space #06 + #f9 = #ff bytes )
 @list_data $8000
-@mbox_data $1000
\ No newline at end of file
+@mbox_data $1000