diff --git a/examples/anchordocking/design/registeranchordocking.pas b/examples/anchordocking/design/registeranchordocking.pas
index 780c03915e..38083ce7e2 100644
--- a/examples/anchordocking/design/registeranchordocking.pas
+++ b/examples/anchordocking/design/registeranchordocking.pas
@@ -77,7 +77,7 @@ type
   public
     constructor Create;
     destructor Destroy; override;
-    procedure MakeIDEWindowDockSite(AForm: TCustomForm); override;
+    procedure MakeIDEWindowDockSite(AForm: TCustomForm; ASides: TDockSides = [alBottom]); override;
     procedure MakeIDEWindowDockable(AControl: TWinControl); override;
     function AddableInWindowMenu(AForm: TCustomForm): boolean; override;
     function GetDefaultLayoutFilename: string;
@@ -225,7 +225,8 @@ begin
   inherited Destroy;
 end;
 
-procedure TIDEAnchorDockMaster.MakeIDEWindowDockSite(AForm: TCustomForm);
+procedure TIDEAnchorDockMaster.MakeIDEWindowDockSite(AForm: TCustomForm;
+  ASides: TDockSides);
 var
   aManager: TAnchorDockManager;
 begin
diff --git a/examples/dockmanager/design/easydockmgrdsgn.pas b/examples/dockmanager/design/easydockmgrdsgn.pas
index 9974b6e305..ba4a71c2d6 100644
--- a/examples/dockmanager/design/easydockmgrdsgn.pas
+++ b/examples/dockmanager/design/easydockmgrdsgn.pas
@@ -2,7 +2,7 @@
   This source is only used to compile and install the package.
  }
 
-unit easydockmgrdsgn; 
+unit EasyDockMgrDsgn; 
 
 interface
 
diff --git a/examples/dockmanager/design/registereasydockmgr.pas b/examples/dockmanager/design/registereasydockmgr.pas
index 3de67801fb..4bde646df3 100644
--- a/examples/dockmanager/design/registereasydockmgr.pas
+++ b/examples/dockmanager/design/registereasydockmgr.pas
@@ -32,7 +32,7 @@ unit RegisterEasyDockMgr;
 
 {$mode objfpc}{$H+}
 
-{.$DEFINE DockMaster}  //must match IDE setting
+{$DEFINE DockMaster}  //must match IDE setting
 
 interface
 
@@ -44,7 +44,6 @@ uses
 const
   DefaultConfigFileName = 'easydocklayout.lyt';
 type
-  TDockSides = set of TAlign;
 
   { TIDEEasyDockMaster }
 
diff --git a/examples/dockmanager/package/easydockmgr.pas b/examples/dockmanager/package/easydockmgr.pas
index 2db7947129..081093e9c5 100644
--- a/examples/dockmanager/package/easydockmgr.pas
+++ b/examples/dockmanager/package/easydockmgr.pas
@@ -1,8 +1,8 @@
-{ This file was automatically created by Lazarus. do not edit!
+{ This file was automatically created by Lazarus. Do not edit!
   This source is only used to compile and install the package.
  }
 
-unit easydockmgr; 
+unit EasyDockMgr; 
 
 interface
 
diff --git a/ideintf/idewindowintf.pas b/ideintf/idewindowintf.pas
index 27cd194fc4..3b189fcbc5 100644
--- a/ideintf/idewindowintf.pas
+++ b/ideintf/idewindowintf.pas
@@ -337,12 +337,14 @@ var
 
 type
 
+  TDockSides = set of TAlign;
+
   { TIDEDockMaster }
 
   TIDEDockMaster = class
   public
     procedure MakeIDEWindowDockable(AControl: TWinControl); virtual; abstract; // make AControl dockable, it can be docked and other dockable windows can be docked to it, this does not make it visible
-    procedure MakeIDEWindowDockSite(AForm: TCustomForm); virtual; abstract; // make AForm a dock site, AForm can not be docked, its Parent must be kept nil, this does not make it visible
+    procedure MakeIDEWindowDockSite(AForm: TCustomForm; ASides: TDockSides = [alBottom]); virtual; abstract; // make AForm a dock site, AForm can not be docked, its Parent must be kept nil, this does not make it visible
     procedure ShowForm(AForm: TCustomForm; BringToFront: boolean); virtual; abstract; // make a form visible, set BringToFront=true if form should be shown on active screen and on front of other windows, normally this focus the form
     function AddableInWindowMenu(AForm: TCustomForm): boolean; virtual;
     procedure CloseAll; virtual; // close all forms, called after IDE has saved all and shuts down