From 1fa6c70b51087f251762a4288fc0d087ab72551c Mon Sep 17 00:00:00 2001
From: Tolik <85737314+Tolik-Trek@users.noreply.github.com>
Date: Wed, 26 Feb 2025 05:31:35 +1000
Subject: [PATCH] =?UTF-8?q?-bug=20in=20=5FTST=5FPROC=5F2=20-=20=D0=BC?=
 =?UTF-8?q?=D0=BE=D0=B3=20=D0=B7=D0=B0=D0=BB=D0=B5=D0=B7=D1=82=D1=8C=20?=
 =?UTF-8?q?=D0=BD=D0=B5=20=D0=B2=20=D1=82=D1=83=20=D0=BF=D0=B0=D0=BF=D0=BA?=
 =?UTF-8?q?=D1=83=20=D0=BF=D0=B5=D1=80=D0=B5=D0=B4=20=D0=B7=D0=B0=D0=BF?=
 =?UTF-8?q?=D1=83=D1=81=D0=BA=D0=BE=D0=BC=20=D0=BF=D1=80=D0=B8=D0=BB=D0=BE?=
 =?UTF-8?q?=D0=B6=D0=B5=D0=BD=D0=B8=D1=8F=20=D1=81=20=D1=84=D0=BB=D0=B0?=
 =?UTF-8?q?=D0=B3=D0=BE=D0=BC=20CurrentDIr=20=3D=200?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 DSS/API/Execute.ASM | 1 +
 DSS/DSS-MAIN.ASM    | 2 ++
 DSS/build.txt       | 2 +-
 SHELL/build.txt     | 2 +-
 4 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/DSS/API/Execute.ASM b/DSS/API/Execute.ASM
index 71264ef..c4c9fc6 100644
--- a/DSS/API/Execute.ASM
+++ b/DSS/API/Execute.ASM
@@ -423,6 +423,7 @@ _TST_PROC_2:	LD	SP,(CORE_BUFFERS.EXEBUFF.SP_REG)
 		 OR	A
 		 JR	NZ,.set_path
 		 CALL	DIR_PATH_CHANGE.FullCurrent
+		 LD	HL,CORE_BUFFERS.CurrentPath
 .set_path:	 CALL	CHDIR_FN
 		 POP	IX
 		;
diff --git a/DSS/DSS-MAIN.ASM b/DSS/DSS-MAIN.ASM
index 51b6249..0b896b7 100644
--- a/DSS/DSS-MAIN.ASM
+++ b/DSS/DSS-MAIN.ASM
@@ -514,6 +514,8 @@ CLEAR_ZONE.size         EQU _sBuffers
 	EXPORT	CORE_BUFFERS.BUFFER
 	EXPORT	CORE_BUFFERS.SECTOR_BUFFER
 	EXPORT	CORE_BUFFERS.MemoryTable
+	EXPORT	CORE_BUFFERS.CurrentDirectory
+	EXPORT	CORE_BUFFERS.WorkDirectory
 /*
 ;R11    \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ 
 FM_BUF          _sFM=$
diff --git a/DSS/build.txt b/DSS/build.txt
index 19c7bdb..8e2afd3 100644
--- a/DSS/build.txt
+++ b/DSS/build.txt
@@ -1 +1 @@
-16
\ No newline at end of file
+17
\ No newline at end of file
diff --git a/SHELL/build.txt b/SHELL/build.txt
index ee2b836..2da4325 100644
--- a/SHELL/build.txt
+++ b/SHELL/build.txt
@@ -1 +1 @@
-456
\ No newline at end of file
+457
\ No newline at end of file