From fcdd876a2b54c233dc1a9335e3072cf5aadf7159 Mon Sep 17 00:00:00 2001
From: wp_xxyyzz <wp_xxyyzz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Fri, 30 Dec 2022 18:36:31 +0000
Subject: [PATCH] TvPlanIt: Fix incorrect positioning of in-place editor of
 TVpWeekView.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8666 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/tvplanit/source/vpweekview.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/components/tvplanit/source/vpweekview.pas b/components/tvplanit/source/vpweekview.pas
index 5deb38ef5..f392d6d56 100644
--- a/components/tvplanit/source/vpweekview.pas
+++ b/components/tvplanit/source/vpweekview.pas
@@ -1782,9 +1782,9 @@ begin
         )
       else
         wvInPlaceEditor.SetBounds(
-          wvActiveEventRec.Left + FGutterWidth + TextMargin,
+          wvActiveEventRec.Left + TextMargin,
           wvActiveEventRec.Top + TextMargin,
-          WidthOf(wvActiveEventRec) - TextMargin - FGutterWidth - 1,
+          WidthOf(wvActiveEventRec) - TextMargin - 1,
           HeightOf(wvActiveEventRec) - 2*TextMargin
         );
       wvInplaceEditor.Show;