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

Merge branch 'CallWakeMainThreadOnQuit' into 'main'

Browse Source 
Cocoa:  Need to call WakeMainThread from nextEventMatching when quitting.

See merge request freepascal.org/lazarus/lazarus!383
This commit is contained in:
rich2014 2024-12-20 14:26:32 +00:00
commit d9c3191562
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/cocoa/cocoaobject.inc
View File

@ -764,6 +764,8 @@ begin
Application.MainForm.Close
else
Application.Terminate;
if Assigned(WakeMainThread) then
WakeMainThread(nil);
end;
// Let caller know if the shutdown was cancelled
if (not Application.Terminated) and (replyEvent.descriptorType <> typeNull) then