This commit is contained in:
Lutz
2023-08-11 09:42:58 +02:00
parent 6aa6a391d5
commit 9052e2b350
18 changed files with 34178 additions and 523 deletions

Binary file not shown.

Binary file not shown.

View File

@@ -3,22 +3,21 @@ lparameters toUpdateObject
* Set the properties of the passed updater object.
with toUpdateObject
.VersionNumber = '1.19.80 - 20230808'
.AvailableVersion = 'FoxBin2PRG-1.19.80-update-20230808'
.VersionNumber = '1.19.79 - 20230809'
.AvailableVersion = 'FoxBin2PRG-1.19.79-update-20230809'
.Notes = GetNotes()
.RegisterWithThor = GetRegisterWithThor()
* .RegisterWithThor = "SET STEP ON"+0h0d0a+"*"+NVL(EXECSCRIPT(_SCREEN.cThorDispatcher, 'Thor_Proc_GetFoxBin2PrgFolder'),'fail')
.RegisterWithThor = GetRegisterWithThor()
endwith
return toUpdateObject
procedure GetRegisterWithThor
local lcCommand
text to lcCommand noshow
SET STEP ON
lcBase = EXECSCRIPT(_SCREEN.cThorDispatcher, 'Thor_Proc_GetFoxBin2PrgFolder')
IF FILE(m.lcBase+"clean_copied_memo.prg") THEN
*old crap
DO m.lcBase+"clean_thorfolder.prg"
*remove old crap
DO m.lcBase+"clean_thorfolder.prg" WITH lcBase
ENDIF &&FILE(m.lcBase+"clean_copied_memo.prg")
DELETE FILE (m.lcBase+"clean_thorfolder.*")
@@ -471,4 +470,4 @@ return lcNotes
* "FoxBin2PRG" is a Component. No procedure GetRegisterWithThor created by VFPX Deployment
*created by VFPX Deployment, 06.08.2023 21:23:17
*created by VFPX Deployment, 09.08.2023 12:53:03