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

libman, fix, state of the reg btn not set properly

This commit is contained in:
Basile Burg 2017-03-03 11:14:56 +01:00
parent d48aa0b38b
commit 2c67672edd
No known key found for this signature in database
GPG Key ID: 1868039F415CB8CF
2 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lazproj/coedit.lpi
View File

@ -1,7 +1,7 @@
<?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="UTF-8"?>
<CONFIG> <CONFIG>
<ProjectOptions> <ProjectOptions>
<Version Value="9"/> <Version Value="10"/>
<PathDelim Value="\"/> <PathDelim Value="\"/>
<General> <General>
<SessionStorage Value="InProjectDir"/> <SessionStorage Value="InProjectDir"/>

4
src/ce_libmaneditor.pas
View File

@ -131,7 +131,8 @@ end;
procedure TCELibManEditorWidget.projClosing(project: ICECommonProject); procedure TCELibManEditorWidget.projClosing(project: ICECommonProject);
begin begin
fProj := nil; if fProj = project then
fProj := nil;
if project = fFreeProj then if project = fFreeProj then
fFreeProj := nil; fFreeProj := nil;
updateButtonsState; updateButtonsState;
@ -699,6 +700,7 @@ begin
exit; exit;
LibMan.libraries.Delete(List.Selected.Index); LibMan.libraries.Delete(List.Selected.Index);
List.Items.Delete(List.Selected.Index); List.Items.Delete(List.Selected.Index);
updateButtonsState;
end; end;
procedure TCELibManEditorWidget.btnSelProjClick(Sender: TObject); procedure TCELibManEditorWidget.btnSelProjClick(Sender: TObject);