From 883686d4a2eadf552b50d399cb6c798d52901b64 Mon Sep 17 00:00:00 2001
From: Derek Stevens <nilix@nilfm.cc>
Date: Sat, 18 Mar 2023 10:28:53 -0600
Subject: [PATCH] fix mbox refresh

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

diff --git a/taro-ls.tal b/taro-ls.tal
index 6e02462..86a40d8 100644
--- a/taro-ls.tal
+++ b/taro-ls.tal
@@ -449,14 +449,14 @@ JMP2r
   #00 ,&chr STR
   STHk
   
+  ( clear the previous selection with null bytes )
   #ff #00 &clear_mbox EQUk ,&ready JCN
-    #00 #00 ROTk ;selected_mbox ADD2 #0000 SWP2 STA
+    DUP #00 SWP ;selected_mbox ADD2 #00 ROT ROT STA
     INC ,&clear_mbox JMP &ready POP2
 
+  ( get position of the current selection )
   ( bytes ) LDZ2 #0000 &while EQU2k ,&end JCN
     STHkr LB_SELECT_IDX LDZ2 ,&idx LDR2 EQU2 ,&write_str JCN 
-    ;debug_mbox_search debug
-    DUP2 print
     DUP2 STHkr LB_DATA LDZ2 ADD2 LDA #0a EQU ,&inc JCN
     INC2 ,&while JMP
   &inc ,&idx LDR2 INC2 ,&idx STR2 INC2 ,&while JMP
@@ -464,13 +464,13 @@ JMP2r
   &idx $2
   &chr $1
   
+  ( copy the current selection to the buffer )
   &write_str STHkr LB_DATA LDZ2 ADD2
   &loop LDAk #0a EQU ,&end JCN
     LDAk [ ;selected_mbox #00 ,&chr LDR ADD2 ] STA
     ,&chr LDR INC ,&chr STR INC2 ,&loop JMP
   &end
   
-  ;selected_mbox debug
   POP2 POP2
   POPr
   #01 .Console/write DEO