diff --git a/res/proboothd b/res/proboothd
index 7b3840081..9cb405530 100644
Binary files a/res/proboothd and b/res/proboothd differ
diff --git a/src/4cade.init.a b/src/4cade.init.a
index 8c701de3a..c0e1ad8bf 100644
--- a/src/4cade.init.a
+++ b/src/4cade.init.a
@@ -180,7 +180,14 @@ OneTimeSetup
          jsr   SaveOrRestoreScreenHoles ; save initial copy of screen hole content
          lda   #$91
          sta   holepatch             ; enable restoring of copy from now on
-         lda   $43
+         ldy   #$0b
+CopyDevs
+         lda   $BF13,y
+         sta   promote + $13,y
+         dey
+         bpl   CopyDevs
+
+         lda   $BF30
          sta   promote + ProDOS_unit - $bf00
                                      ; save unit in LC bank 2 while overriding !pseudopc
 
diff --git a/src/proboothd/proboothd.s b/src/proboothd/proboothd.s
index 824c7f257..804d28619 100644
--- a/src/proboothd/proboothd.s
+++ b/src/proboothd/proboothd.s
@@ -117,7 +117,12 @@ seekread        stx bloklo
                 sty blokhi
 entry           jmp $d1d1
 
-fakeMLI         beq readblk
+fakeMLI         bne retcall
+readblk         dey
+                dey
+                sty adrhi
+                tay
+                jsr seekread
 retcall         pla
                 tax
                 inx
@@ -126,12 +131,6 @@ retcall         pla
                 txa
                 pha
                 rts
-readblk         dey
-                dey
-                sty adrhi
-                tay
-                jsr seekread
-                bcc retcall
 fakeMLI_e
 
 filename        !byte filename_e - filename_b