From 8fe46ab488e117ad9d8d867ca26a5905f57bc4b6 Mon Sep 17 00:00:00 2001
From: Sergey Kalinin <svk@nuk-svk.ru>
Date: Wed, 17 Aug 2022 21:28:02 +0300
Subject: [PATCH] =?UTF-8?q?=D0=A1=D0=BB=D0=B5=D0=B3=D0=BA=D0=B0=20=D0=BF?=
 =?UTF-8?q?=D0=BE=D0=BC=D0=B5=D0=BD=D1=8F=D0=BB=20=D1=81=D1=82=D0=B8=D0=BB?=
 =?UTF-8?q?=D1=8C=20=D0=BE=D1=84=D0=BE=D1=80=D0=BC=D0=BB=D0=B5=D0=BD=D0=B8?=
 =?UTF-8?q?=D1=8F?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 lib/editor.tcl           | 3 ++-
 theme/ttk_theme_dark.tcl | 2 +-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/editor.tcl b/lib/editor.tcl
index 62cf826..f04e4b0 100644
--- a/lib/editor.tcl
+++ b/lib/editor.tcl
@@ -633,7 +633,8 @@ namespace eval Editor {
         pack $frmText  -side top -expand true -fill both 
         pack [ttk::scrollbar $frmText.s -command "$frmText.t yview"] -side right -fill y
         ctext $txt -yscrollcommand "$frmText.s set" -font $cfgVariables(font) -linemapfg $cfgVariables(lineNumberFG) \
-            -tabs "[expr {4 * [font measure $cfgVariables(font) 0]}] left" -tabstyle tabular -undo true 
+            -tabs "[expr {4 * [font measure $cfgVariables(font) 0]}] left" -tabstyle tabular -undo true \
+            -relief flat
             
         pack $txt -fill both -expand 1
         # puts ">>>>>>> [bindtags $txt]"
diff --git a/theme/ttk_theme_dark.tcl b/theme/ttk_theme_dark.tcl
index 7a0f4ea..20b79a1 100644
--- a/theme/ttk_theme_dark.tcl
+++ b/theme/ttk_theme_dark.tcl
@@ -112,7 +112,7 @@ namespace eval ttk::theme::dark {
         option add *Text.Foreground $colors(-foreground) interactive
         option add *Text.Background $colors(-frame) interactive
         
-        option add *Text.Insertbackground yellow interactive
+        # option add *Text.Insertbackground yellow interactive
         # option add *Text.BorderWidth -2 interactive
         # option add *Text.selectBorderWidth -2 interactive
         # option add *Text.Relief flat interactive