diff --git a/src/mli.a b/src/mli.a
index 5aff227..e45c032 100755
--- a/src/mli.a
+++ b/src/mli.a
@@ -501,6 +501,7 @@ CreateRAMFile
 
          ;no, create a new one
 
+         jsr   SwapProDOS
          lda   OnlineReturn
          tay
          clc
@@ -546,7 +547,7 @@ CreateRAMFile
          php
          jsr   SaveGlobal
          plp
-         bcc   .done
+         bcc   .restore
 
          lda   gRAMDiskRef
          jsr   CloseFile
@@ -561,6 +562,13 @@ CreateRAMFile
          ldx   #FALSE
          stx   gUsingRAMDisk
 
+.restore
+         php
+         pha
+         jsr   SwapProDOS
+         pla
+         plp
+
 .done
          rts