forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

early return

This commit is contained in:
Basile Burg 2019-04-04 10:12:34 +02:00
parent cb6c0a5091
commit afc69e275d
1 changed files with 6 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
src/u_main.pas
View File

@ -3714,13 +3714,12 @@ end;
function TMainForm.checkProjectLock(message: boolean = true): boolean;
begin
result := false;
if fProjActionsLock then
begin
result := true;
if message then
dlgOkInfo('This action is disabled while a project compiles',
'Project lock warning');
end
if not fProjActionsLock then
exit;
result := true;
if message then
dlgOkInfo('This action is disabled while a project compiles',
'Project lock warning');
end;
procedure TMainForm.showProjTitle;