From 5e1952573d865500afe8db57daab47f9c7d6cc6b Mon Sep 17 00:00:00 2001
From: 4am <a2_4am@sent.com>
Date: Sun, 19 Dec 2021 21:00:18 -0500
Subject: [PATCH] copy SHR filename to a safe place before blanking

fixes https://github.com/a2-4am/4cade/issues/443
---
 src/ui.attract.shr.a | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/ui.attract.shr.a b/src/ui.attract.shr.a
index c9cec8d34..067e885b0 100644
--- a/src/ui.attract.shr.a
+++ b/src/ui.attract.shr.a
@@ -41,6 +41,8 @@ SHRSlideshow
 ;        graphics mode reset to display hi-res screen, which is blank
 ;------------------------------------------------------------------------------
 SHRSingle
+         jsr   SetPath
+         +LDADDR gPathname
          +ST16 IndexedSHRFilename
          lda   MachineStatus         ; only show SHR on IIgs or if we have a VidHD card
          and   #SUPPORTS_SHR