paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-28 16:40:48 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE, Editor Macro Pascal: fix switching between macros, broken in c77c71b54e

Browse Source 
(cherry picked from commit 81f3140a4b)
This commit is contained in:
Martin 2024-10-26 14:39:37 +02:00
parent 2324992bb3
commit 8f51444869
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
components/macroscript/emscriptmacro.pas
View File

@ -307,7 +307,13 @@ begin
Exec.LoadDebugData(FCachedCompiledDbg); Exec.LoadDebugData(FCachedCompiledDbg);
end end
else begin else begin
Exec.Cleanup; if FPrivateExec = nil then begin
if not Exec.LoadData(FCachedCompiled) then // Load the data from the Data string.
exit;
Exec.LoadDebugData(FCachedCompiledDbg);
end
else
Exec.Cleanup;
end; end;
Exec.SynEdit := aEditor as TCustomSynEdit; Exec.SynEdit := aEditor as TCustomSynEdit;