From 430f7d6607d14f08efdb50dbf17040c79637a9ca Mon Sep 17 00:00:00 2001 From: Sergey Kalinin Date: Mon, 27 Oct 2025 14:05:40 +0300 Subject: [PATCH] =?UTF-8?q?=D0=98=D1=81=D0=BF=D1=80=D0=B0=D0=B2=D0=BB?= =?UTF-8?q?=D0=B5=D0=BD=D0=BE=20=D1=81=D0=BE=D0=B7=D0=B4=D0=B0=D0=BD=D0=B8?= =?UTF-8?q?=D0=B5=20=D1=84=D0=B0=D0=B9=D0=BB=D0=B0=20=D0=BA=D0=BE=D0=BD?= =?UTF-8?q?=D1=84=D0=B8=D0=B3=D1=83=D1=80=D0=B0=D1=86=D0=B8=D0=B8.=20?= =?UTF-8?q?=D0=94=D0=BE=D0=B1=D0=B0=D0=B2=D0=BB=D0=B5=D0=BD=D1=8B=20=D0=BD?= =?UTF-8?q?=D0=BE=D0=BC=D0=B5=D1=80=D0=B0=20=D0=B2=D0=B5=D1=80=D1=81=D0=B8?= =?UTF-8?q?=D0=B9=20=D0=B2=20=D0=B2=D1=8B=D0=B7=D0=BE=D0=B2=20tclsh8.6=20?= =?UTF-8?q?=D0=B8=20wish8.6.=20=D0=A3=D0=B1=D1=80=D0=B0=D0=BD=D0=B0=20?= =?UTF-8?q?=D0=B7=D0=B0=D0=B2=D0=B8=D1=81=D0=B8=D0=BC=D0=BE=D1=81=D1=82?= =?UTF-8?q?=D0=B8=D1=82=D1=8C=20=D0=BD=D0=B0=20Threads.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- changelog-gen.tcl | 3 +-- debian/changelog | 7 +++++++ lib/config.tcl | 2 +- lib/readstructure.tcl | 2 +- projman.tcl | 6 +++--- tkregexp.tcl | 3 +-- 6 files changed, 14 insertions(+), 9 deletions(-) diff --git a/changelog-gen.tcl b/changelog-gen.tcl index 0306648..78a6c0d 100755 --- a/changelog-gen.tcl +++ b/changelog-gen.tcl @@ -1,6 +1,6 @@ #!/bin/sh # Tcl ignores the next line -*- tcl -*- \ -exec tclsh "$0" -- "$@" +exec tclsh8.6 "$0" -- "$@" ###################################################################### # ProjMan 2 @@ -334,4 +334,3 @@ if [info exists args(--txt)] { StoreChangeLog $outText } } - diff --git a/debian/changelog b/debian/changelog index 787e0b6..dc4139f 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,9 @@ +projman (2.0.0-alpha18) stable; urgency=medium + + * Новая сборка + + -- Калинин Сергей Валерьевич Thu, 23 Oct 2025 13:58:22 +0300 + projman (2.0.0-alpha18) stable; urgency=medium * Исправлено чтение структуры проекта при открытии из меню 'Открыть недавнее' @@ -362,3 +368,4 @@ projman (2.0.0-alfa0) stable; urgency=medium + diff --git a/lib/config.tcl b/lib/config.tcl index d88e89e..25ec0d2 100644 --- a/lib/config.tcl +++ b/lib/config.tcl @@ -64,7 +64,7 @@ multilineComments=true \[UserSession\] opened= editedFiles= -recentlyEditedFolders= +recentlFolder= " proc Config::create {dir} { set cfgFile [open [file join $dir projman.ini] "w+"] diff --git a/lib/readstructure.tcl b/lib/readstructure.tcl index 40bd75c..c32051f 100644 --- a/lib/readstructure.tcl +++ b/lib/readstructure.tcl @@ -9,7 +9,7 @@ # ###################################################### package require fileutil -package require Thread +# package require Thread # TCL procedure diff --git a/projman.tcl b/projman.tcl index 5bb4420..3168c22 100755 --- a/projman.tcl +++ b/projman.tcl @@ -1,6 +1,6 @@ #!/bin/sh # Tcl ignores the next line -*- tcl -*- \ -exec wish "$0" -- "$@" +exec wish8.6 "$0" -- "$@" ###################################################### # Tcl/Tk Project manager 2.0 @@ -10,7 +10,7 @@ exec wish "$0" -- "$@" ###################################################### # Version: 2.0.0 # Release: alpha18 -# Build: 22102025093435 +# Build: 27102025140309 ###################################################### # определим текущую версию, релиз и т.д. @@ -40,7 +40,7 @@ package require inifile package require ctext package require base64 package require fileutil -package require Thread +# package require Thread package require fileutil::magic::filetype # Устанавливаем текущий каталог diff --git a/tkregexp.tcl b/tkregexp.tcl index 12b9779..4f00829 100755 --- a/tkregexp.tcl +++ b/tkregexp.tcl @@ -1,7 +1,7 @@ #!/bin/sh #-*-tcl-*- # the next line restarts using wish \ -exec wish "$0" -- ${1+"$@"} +exec wish8.6 "$0" -- ${1+"$@"} set version 3.0 @@ -1367,4 +1367,3 @@ proc make-regexp::make-regexp {words} { #============================================================================================== -