diff --git a/lazproj/coedit b/lazproj/coedit new file mode 100644 index 00000000..4605a730 Binary files /dev/null and b/lazproj/coedit differ diff --git a/src/ce_common.pas b/src/ce_common.pas index fb333433..6a492744 100644 --- a/src/ce_common.pas +++ b/src/ce_common.pas @@ -425,7 +425,7 @@ begin result:=Folder; {$ENDIF} {$IFDEF UNIX} - result := ExpandFileName('~/')); + result := ExpandFileName('~/'); {$ENDIF} result += directorySeparator + 'Coedit' + directorySeparator; end; diff --git a/src/ce_main.pas b/src/ce_main.pas index 601fcb10..84554dd4 100644 --- a/src/ce_main.pas +++ b/src/ce_main.pas @@ -340,6 +340,7 @@ begin DockMaster.OnCreateControl := @DockMasterCreateControl; DockMaster.OnShowOptions := @ShowAnchorDockOptions; DockMaster.HeaderStyle := adhsPoints; + if DockManager is TAnchorDockManager then begin aManager:=TAnchorDockManager(DockManager); aManager.PreferredSiteSizeAsSiteMinimum:=false; @@ -362,8 +363,6 @@ begin DockMaster.ManualDock(DockMaster.GetAnchorSite(fPrjCfWidg), DockMaster.GetAnchorSite(fProjWidg), alBottom, fProjWidg); DockMaster.GetAnchorSite(fEditWidg).Header.HeaderPosition := adlhpTop; - // - SaveDocking; end; procedure TCEMainForm.InitSettings; @@ -409,7 +408,7 @@ procedure TCEMainForm.SaveDocking; var xcfg: TXMLConfigStorage; begin - xcfg := TXMLConfigStorage.Create(getDocPath + 'docking.xml',true); + xcfg := TXMLConfigStorage.Create(getDocPath + 'docking.xml',false); try // is always missing DockMaster.SaveLayoutToConfig(xcfg);