From 8435bf0254bdcf78dcfdc8c2b1999ac193ed8e52 Mon Sep 17 00:00:00 2001
From: svk <svk@nuk-svk.ru>
Date: Wed, 21 Jan 2026 16:31:59 +0300
Subject: [PATCH] =?UTF-8?q?=D0=98=D1=81=D0=BF=D1=80=D0=B0=D0=B2=D0=B8?=
 =?UTF-8?q?=D0=BB=20=D0=B2=D1=81=D1=82=D0=B0=D0=B2=D0=BA=D1=83=20=D0=BA?=
 =?UTF-8?q?=D0=B0=D0=B2=D1=8B=D1=87=D0=B5=D0=BA=20=D0=BF=D1=80=D0=B8=20?=
 =?UTF-8?q?=D0=B2=D1=8B=D0=B4=D0=B5=D0=BB=D0=B5=D0=BD=D0=B8=D0=B8=20=D1=82?=
 =?UTF-8?q?=D0=B5=D0=BA=D1=81=D1=82=D0=B0?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 lib/editor.tcl | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/lib/editor.tcl b/lib/editor.tcl
index 828a9fc..ef1ff0b 100644
--- a/lib/editor.tcl
+++ b/lib/editor.tcl
@@ -6,7 +6,6 @@
 ######################################################
 # Editor module
 ######################################################
-
 namespace eval Editor {
     variable selectionTex
     # Set the editor option
@@ -928,7 +927,9 @@ namespace eval Editor {
             }
             if {$posNum == $posBegin} {
                if {$symbol == {"} || $symbol == {_}} {
-                    $txt insert $lineEnd.$posEnd "$selText$symbol"
+                    $txt tag remove sel $lineBegin.$posBegin $lineEnd.$posEnd
+                    $txt insert $lineEnd.$posEnd "$symbol"
+                     # $txt tag add sel "$lineBegin.$posBegin + 1 char" "$lineEnd.$posEnd + 1 char"
                 } else {
                     $txt insert $lineEnd.$posEnd "$symbol"
                 }
@@ -937,7 +938,7 @@ namespace eval Editor {
                 if {$posBegin == 0} {
                     $txt insert $pos "$symbol"
                 } else {
-                    $txt insert "$pos + 1 chars" "$symbol"
+                    $txt insert "$pos + 0 chars" "$symbol"
                 }
             }
             $txt highlight $lineBegin.$posBegin $lineEnd.end
@@ -1604,7 +1605,7 @@ namespace eval Editor {
         }
 
         set frmText [ttk::frame $w.frmText2 -border 1]
-        $w.panelTxt add $frmText -weight 1
+        puts "SplitEditorForExecute: $w"
         # focus -force $frmText.t.t
         Execute $fileFullPath $frmText $w
     }