From bf964804cc2ed32294565b2477c8f0646fe1a63b Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Tue, 11 Jul 2017 21:13:06 +0200
Subject: [PATCH] improve default settings on first run

---
 src/ce_editoroptions.pas | 4 +++-
 src/ce_main.pas          | 7 +------
 src/ce_messages.lfm      | 1 +
 3 files changed, 5 insertions(+), 7 deletions(-)

diff --git a/src/ce_editoroptions.pas b/src/ce_editoroptions.pas
index aeb680b5..b613cd5c 100644
--- a/src/ce_editoroptions.pas
+++ b/src/ce_editoroptions.pas
@@ -242,7 +242,7 @@ begin
   fAutoCloseCurlyBrace:= autoCloseOnNewLineLexically;
   fAutoClosedPairs:= [autoCloseSquareBracket];
   //
-  fCompletionMenuWidth:= 250;
+  fCompletionMenuWidth:= 320;
   fCompletionMenuLines:= 15;
   //
   fLineNumEvery := 5;
@@ -251,6 +251,8 @@ begin
   blockIndentation := 4;
   fBackground := clWhite;
   fRightEdgeColor := clSilver;
+  fSmartDdocNewline:=true;
+  fScrollPreview:=true;
   //
   fDscannerEnabled:=true;
   fDscannerDelay:= 2200;
diff --git a/src/ce_main.pas b/src/ce_main.pas
index de5a4452..292eff8d 100644
--- a/src/ce_main.pas
+++ b/src/ce_main.pas
@@ -1454,14 +1454,9 @@ begin
     DockMaster.ManualDock(DockMaster.GetAnchorSite(fFindWidg), DockMaster.GetAnchorSite(fSymlWidg), alBottom, fSymlWidg);
     DockMaster.ManualDock(DockMaster.GetAnchorSite(fPrInpWidg), DockMaster.GetAnchorSite(fFindWidg), alTop, fFindWidg);
     DockMaster.ManualDock(DockMaster.GetAnchorSite(fExplWidg), DockMaster.GetSite(fSymlWidg), alClient, fSymlWidg);
-    if GetDockSplitter(DockMaster.GetSite(fFindWidg), akTop, topsplt) then
-    begin
-      topsplt.MoveSplitter(40);
-      topsplt := nil;
-    end;
     if GetDockSplitter(DockMaster.GetSite(fPrInpWidg), akTop, topsplt) then
     begin
-      topsplt.MoveSplitter(40);
+      topsplt.MoveSplitter(50);
       topsplt := nil;
     end;
     fSymlWidg.showWidget;
diff --git a/src/ce_messages.lfm b/src/ce_messages.lfm
index 45340ebf..17a3d374 100644
--- a/src/ce_messages.lfm
+++ b/src/ce_messages.lfm
@@ -25,6 +25,7 @@ inherited CEMessagesWidget: TCEMessagesWidget
         Width = 840
         Align = alClient
         BorderSpacing.Around = 2
+        Font.Style = [fsBold]
         HideSelection = False
         Images = imgList
         MultiSelect = True