From c4dad70680123793f28ca8ad5fe0ff39375eebfc Mon Sep 17 00:00:00 2001
From: Lutz <Lutz@Scheffler-Software.de>
Date: Tue, 8 Aug 2023 11:26:58 +0200
Subject: [PATCH] v80.2

---
 ThorUpdater/FoxBin2PrgVersion.txt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ThorUpdater/FoxBin2PrgVersion.txt b/ThorUpdater/FoxBin2PrgVersion.txt
index ceb9ce7..c461402 100644
--- a/ThorUpdater/FoxBin2PrgVersion.txt
+++ b/ThorUpdater/FoxBin2PrgVersion.txt
@@ -7,7 +7,7 @@ with toUpdateObject
 	.AvailableVersion = 'FoxBin2PRG-1.19.80-update-20230808'
 	.Notes            = GetNotes()
 *	.RegisterWithThor = GetRegisterWithThor()
-	.RegisterWithThor = "SET STEP ON"+0h0d0a+"*"+sys(16)
+	.RegisterWithThor = "SET STEP ON"+0h0d0a+"*"+NVL(EXECSCRIPT(_SCREEN.cThorDispatcher, 'Thor_Proc_GetFoxBin2PrgFolder'),'fail')
 endwith
 return toUpdateObject