From 760209d7907f79be0a4d52887602e10910fd0866 Mon Sep 17 00:00:00 2001
From: Kelvin Sherlock <ksherlock@gmail.com>
Date: Sun, 18 Jul 2021 14:36:05 -0400
Subject: [PATCH] boot string needs a colon....

---
 loader.aii | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/loader.aii b/loader.aii
index fc4bf52..9ab3df8 100644
--- a/loader.aii
+++ b/loader.aii
@@ -116,6 +116,7 @@ cat_str		dcb.b 32, 0
 
 getbootname proc
 	; getbootname(GSString *)
+	; return string needs a leading colon.
 
 	with dp
 
@@ -140,14 +141,18 @@ getbootname proc
 	with HFSMasterDirectoryBlock
 	lda buffer+drVN
 	and #$ff
+	inc a ; + 1 for :
 	sta [ptr]
-	inc a
+	inc a ; round up and divide
 	lsr a
 	tax ; count
 	dex
 
 	ldy #2
-@loop	lda buffer+drVN-1,y
+	lda #':'
+	sta [ptr],y
+	iny
+@loop	lda buffer+drVN-2,y
 	sta [ptr],y
 	iny
 	iny