Новая сборка

debian/changelog

@@ -1,3 +1,10 @@
+projman (2.0.0-alpha18) stable; urgency=medium
+
+  *  Исправлено чтение структуры проекта при открытии из меню 'Открыть недавнее'
+  *  Исправление работы процедуры varhelper
+
+ -- svk <svk@nuk-svk.ru>  Tue, 21 Oct 2025 15:47:02 +0300
+
 projman (2.0.0-alpha17) stable; urgency=medium
 
   *  Added the "Open Recent" menu.
@@ -354,3 +361,4 @@ projman (2.0.0-alfa0) stable; urgency=medium
  -- svkalinin <banzaj28@yandex.ru>  Thu,  5 Jul 2018 08:41:18 +0300
 
 
+

lib/editor.tcl

@@ -580,7 +580,7 @@ namespace eval Editor {
         if { [set height [llength $findedVars]] > 10 } { set height 10 }
         $win.lBox configure -height $height
 
-        focus $win.lBox
+        # focus $win.lBox
         
         bind $win <Escape> {
             destroy $Editor::win
@@ -592,7 +592,7 @@ namespace eval Editor {
             focus -force $Editor::txt.t
             break
         }
-        bind $win <Control-Return> {
+        bind VarHelperBind <Control-Return> {
             $Editor::txt delete "insert - 1 chars wordstart" "insert wordend - 1 chars"
             $Editor::txt insert "insert" [.varhelper.lBox get [.varhelper.lBox curselection]]
             # eval [bind VarHelperBind <Escape>]

lib/menu.tcl

@@ -28,7 +28,7 @@ proc GetFileMenu {m} {
     menu $m.openRecent
     $m add cascade -label [::msgcat::mc "Open recent"] -menu $m.openRecent
     foreach item $cfgVariables(recentFolder) {
-        $m.openRecent add command -label $item -command [list FileOper::ReadFolder $item]
+        $m.openRecent add command -label $item -command [list OpenRecentProject $item]
     }
 
     $m add separator

lib/procedure.tcl

@@ -714,4 +714,3 @@ proc AddRecentEditedFolder {path} {
     }
     .frmMenu.mnuFile.m.openRecent add command -label $path -command [list OpenRecentProject $path]
 }
-

projman.tcl

@@ -9,8 +9,8 @@ exec wish "$0" -- "$@"
 # Home page: https://nuk-svk.ru
 ######################################################
 # Version: 2.0.0
-# Release: alpha17
+# Release: alpha18
-# Build: 21102025154120
+# Build: 22102025093435
 ######################################################
 
 # определим текущую версию, релиз и т.д.