diff --git a/A2OSX.BOOT.po b/A2OSX.BOOT.po
index 78fb8e03..b7054312 100644
Binary files a/A2OSX.BOOT.po and b/A2OSX.BOOT.po differ
diff --git a/A2OSX.SRC.po b/A2OSX.SRC.po
index b85212b5..454d3dad 100644
Binary files a/A2OSX.SRC.po and b/A2OSX.SRC.po differ
diff --git a/SYS/KERNEL.S.DIR.txt b/SYS/KERNEL.S.DIR.txt
index ae7e4305..63434141 100644
--- a/SYS/KERNEL.S.DIR.txt
+++ b/SYS/KERNEL.S.DIR.txt
@@ -252,10 +252,13 @@ K.READDIRA.DIR  ldy #S.DIR.PRODOS.REF
 				lda (ZPQuickPtr1),y
 				bne .2					no, we have all we need....
 				
-				ldy #$23+3
+				ldy #$1f+3
+				ldx #3
+				
 .1				lda (ZPQuickPtr2),y		Get EntryLength....	From Block
-				sta EntryLength-$23,y
+				sta EntryLength,x
 				dey
+				dex
 				bpl .1
 				bra .4
 
@@ -308,7 +311,6 @@ K.READDIRA.DIR  ldy #S.DIR.PRODOS.REF
 				bne .51
 				
 * pass #2 Fill Buffer...
-				
 				>PUSHW BufSize				Get a BufSize bytes buffer for storing results
 				>PUSHBI S.MEM.F.INIT0		make sure 0 fiiled
 				jsr K.GetMem
@@ -332,7 +334,7 @@ K.READDIRA.DIR  ldy #S.DIR.PRODOS.REF
 				inc ZPQuickPtr3+1	
 
 .79				dec EntryCountIB
-				beq .72
+				bne .72
 				
 .80				
 *				lda #0					S.MEM.F.INIT0 already did this