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

5
src/u_main.pas
View File

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