From 1385c91255173881cbe67db78b6fbf42bb6b767e Mon Sep 17 00:00:00 2001 From: Sergey Kalinin Date: Wed, 3 Dec 2025 17:33:06 +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=B8=D1=8F=20=D0=BF=D0=BE=D1=81=D0=BB=D0=B5=20?= =?UTF-8?q?=D1=81=D0=BB=D0=B8=D1=8F=D0=BD=D0=B8=D1=8F?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- debian/changelog | 16 +++------------- lib/procedure.tcl | 11 +---------- projman.tcl | 10 ++-------- 3 files changed, 6 insertions(+), 31 deletions(-) diff --git a/debian/changelog b/debian/changelog index a6fdff7..7bd9e2b 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,21 +1,11 @@ -<<<<<<< HEAD -projman (2.0.0-alpha20) stable; urgency=medium -======= -projman (2.1.0-alpha0) stable; urgency=medium +projman (2.1.0-alpha20) stable; urgency=medium - * Добавил вывод информации о версиях tcl и tk + * Добавлены настройки путей к программам для выполнения редактируемых файлов для каждого поддержимаего типа. И использование этих настроек при выполнении файла. * Добавил вывод номера версии tcl/tl в О Программе - -- Sergey Kalinin Mon, 10 Nov 2025 13:13:44 +0300 - -projman (2.1.0-alpha0) stable; urgency=medium - - * Незначительные изменения - - -- Sergey Kalinin Mon, 10 Nov 2025 13:00:43 +0300 + -- Sergey Kalinin Mon, 03 Dec 2025 17:22:44 +0300 projman (2.0.0-alpha19) stable; urgency=medium ->>>>>>> tcltk9.0 * Исправил сохранение и закрытие нового файла. Теперь при сохранении файл будет переоткрыт под новым именем. * Добавил проверку пакета Img. И поправил проверку типов изображений diff --git a/lib/procedure.tcl b/lib/procedure.tcl index 5f8cc62..02ede91 100644 --- a/lib/procedure.tcl +++ b/lib/procedure.tcl @@ -258,11 +258,7 @@ namespace eval Help { set msg "Tcl/Tk project Manager\n\n" append msg "Version: " $projman(Version) "\n" \ "Release: " $projman(Release) "\n" \ -<<<<<<< HEAD - "Build: " $projman(Build) "\n\n" \ -======= "Build: " $projman(Build) "\n" \ ->>>>>>> tcltk9.0 "Tcl Version: " $tcl_version "\n" \ "Tk Version: " $tk_version "\n\n" \ "Author: " $projman(Author) "\n" \ @@ -915,11 +911,6 @@ proc Execute {filePath w activeEditor} { $txt insert end "[::msgcat::mc "Enter command for execute file"] $filePath >\n" set pos [$w.frame.text index insert] set lineNum [lindex [split $pos "."] 0] -<<<<<<< HEAD - $txt insert 0.0 "======================================================================================\n" - $txt tag add bold $lineNum.0 $lineNum.end - Highlight::ExecuteColorized $txt -======= $w.frame.text insert 0.0 "======================================================================================\n" # Added executor from config @@ -933,7 +924,7 @@ proc Execute {filePath w activeEditor} { $w.frame.text tag add bold $lineNum.0 $lineNum.end Highlight::ExecuteColorized $w.frame.text ->>>>>>> tcltk9.0 + # focus -force $w.frame.text # Привязки событий для защиты от редактирования diff --git a/projman.tcl b/projman.tcl index c85e6d9..7445741 100755 --- a/projman.tcl +++ b/projman.tcl @@ -1,6 +1,6 @@ #!/bin/sh # Tcl ignores the next line -*- tcl -*- \ -exec wish9.0 "$0" -- "$@" +exec wish8.6 "$0" -- "$@" ###################################################### # Tcl/Tk Project manager 2.0 @@ -8,15 +8,9 @@ exec wish9.0 "$0" -- "$@" # Author: Sergey Kalinin svk@nuk-svk.ru # Home page: https://nuk-svk.ru ###################################################### -<<<<<<< HEAD -# Version: 2.0.0 -# Release: alpha20 -# Build: 07112025145212 -======= # Version: 2.1.0 # Release: alpha0 -# Build: 10112025132121 ->>>>>>> tcltk9.0 +# Build: 03122025172242 ###################################################### # определим текущую версию, релиз и т.д.