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

cocoa: restore isrun field

Browse Source 
git-svn-id: trunk@61367 -
This commit is contained in:
dmitry 2019-06-12 12:37:55 +00:00
parent 9a966e27f4
commit de095f07d4
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lcl/interfaces/cocoa/cocoaint.pas
View File

@ -66,6 +66,7 @@ type
TCocoaApplication = objcclass(NSApplication) TCocoaApplication = objcclass(NSApplication)
aloop : TApplicationMainLoop; aloop : TApplicationMainLoop;
isrun : Boolean;
modals : NSMutableDictionary; modals : NSMutableDictionary;
procedure dealloc; override; procedure dealloc; override;