Исправлено создание файла конфигурации. Добавлены номера версий в вызов tclsh8.6 и wish8.6. Убрана зависимостить на Threads.
Some checks failed
Gitea Actions Demo / Explore-Gitea-Actions (push) Has been cancelled

This commit is contained in:
2025-10-27 14:05:40 +03:00
parent f54333f942
commit 430f7d6607
6 changed files with 14 additions and 9 deletions

View File

@@ -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
}
}

7
debian/changelog vendored
View File

@@ -1,3 +1,9 @@
projman (2.0.0-alpha18) stable; urgency=medium
* Новая сборка
-- Калинин Сергей Валерьевич <svkalinin@samsonpost.ru> 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

View File

@@ -64,7 +64,7 @@ multilineComments=true
\[UserSession\]
opened=
editedFiles=
recentlyEditedFolders=
recentlFolder=
"
proc Config::create {dir} {
set cfgFile [open [file join $dir projman.ini] "w+"]

View File

@@ -9,7 +9,7 @@
#
######################################################
package require fileutil
package require Thread
# package require Thread
# TCL procedure

View File

@@ -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
# Устанавливаем текущий каталог

View File

@@ -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} {
#==============================================================================================