From 991586208615722f1de8f71f1ec63885a6099b4b Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Tue, 19 Oct 2021 11:09:57 -0700
Subject: [PATCH] support merged packed files

---
 src/glue.prorwts2.a   | 1 +
 src/prodos.impl.lc2.a | 1 +
 2 files changed, 2 insertions(+)

diff --git a/src/glue.prorwts2.a b/src/glue.prorwts2.a
index b40e90827..37458c467 100644
--- a/src/glue.prorwts2.a
+++ b/src/glue.prorwts2.a
@@ -178,6 +178,7 @@ LoadIndexedFile
          jsr   $bf00
          !byte $cc
          !word @cc_parms
+         jsr   swap_zpg              ; restore sizelo2/hi2
          dec   $BF0E                 ; re-enable ROM mapping on return
          jmp   SwitchToBank1
 
diff --git a/src/prodos.impl.lc2.a b/src/prodos.impl.lc2.a
index 9e41971c2..0584d0802 100644
--- a/src/prodos.impl.lc2.a
+++ b/src/prodos.impl.lc2.a
@@ -20,6 +20,7 @@ buffer = first_zp+2 ;word
 
 ProDOS_enter
 !set CloseHandles = @imp_close
+!set swap_zpg = @swap_zp
          stx   ProDOS_savedX+1
          sty   ProDOS_savedY+1
          jsr   @swap_zp