From 04cff70e474dea5cd42433a229d1ccd21544d4e8 Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Sat, 28 Jul 2012 09:21:05 +0000
Subject: [PATCH] DocEditor: set vertical splitter to right place (Left:=1),
 increase left pane's initial width

git-svn-id: trunk@38071 -
---
 doceditor/pgeditor.pp | 1 +
 doceditor/pkeditor.pp | 1 +
 2 files changed, 2 insertions(+)

diff --git a/doceditor/pgeditor.pp b/doceditor/pgeditor.pp
index 602be87ce2..6be1e31cef 100644
--- a/doceditor/pgeditor.pp
+++ b/doceditor/pgeditor.pp
@@ -148,6 +148,7 @@ begin
   FSplitter:=TSplitter.Create(Self);
   FSPlitter.Parent:=Self;
   FSplitter.Align:=alLeft;
+  FSplitter.Left:=1;
   FSplitter.Width:=5;
 
   FElement:=TElementEditor.Create(Self);
diff --git a/doceditor/pkeditor.pp b/doceditor/pkeditor.pp
index 1952ed2cba..241e456b0d 100644
--- a/doceditor/pkeditor.pp
+++ b/doceditor/pkeditor.pp
@@ -271,6 +271,7 @@ Constructor TPackageEditor.Create(AOwner : TComponent);
 
 begin
   Inherited;
+  Width:=300;
   FImageList := TImageList.Create(Self);
   Fimagelist.AddLazarusResource('node_new');      // ImgIndxNew
   Fimagelist.AddLazarusResource('node_edit');     // ImgIndxEdited