Добавил вывод номера версии tcl/tl в О Программе
Some checks failed
Gitea Actions Demo / Explore-Gitea-Actions (push) Has been cancelled
Some checks failed
Gitea Actions Demo / Explore-Gitea-Actions (push) Has been cancelled
This commit is contained in:
7
debian/changelog
vendored
7
debian/changelog
vendored
@@ -1,3 +1,9 @@
|
||||
projman (2.1.0-alpha0) stable; urgency=medium
|
||||
|
||||
* Незначительные изменения
|
||||
|
||||
-- Sergey Kalinin <svkalinin@samsonpost.ru> Mon, 10 Nov 2025 13:00:43 +0300
|
||||
|
||||
projman (2.0.0-alpha19) stable; urgency=medium
|
||||
|
||||
* Небольшие исправления
|
||||
@@ -394,3 +400,4 @@ projman (2.0.0-alfa0) stable; urgency=medium
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
@@ -254,11 +254,13 @@ proc FindImage {ext} {
|
||||
|
||||
namespace eval Help {
|
||||
proc About {} {
|
||||
global projman
|
||||
global projman tcl_version tk_version
|
||||
set msg "Tcl/Tk project Manager\n\n"
|
||||
append msg "Version: " $projman(Version) "\n" \
|
||||
"Release: " $projman(Release) "\n" \
|
||||
"Build: " $projman(Build) "\n\n" \
|
||||
"Build: " $projman(Build) "\n" \
|
||||
"Tcl Version: " $tcl_version "\n" \
|
||||
"Tk Version: " $tk_version "\n\n" \
|
||||
"Author: " $projman(Author) "\n" \
|
||||
"Home page: " $projman(Homepage)
|
||||
# foreach name [array names projman] {
|
||||
|
||||
@@ -8,9 +8,9 @@ exec wish9.0 "$0" -- "$@"
|
||||
# Author: Sergey Kalinin svk@nuk-svk.ru
|
||||
# Home page: https://nuk-svk.ru
|
||||
######################################################
|
||||
# Version: 2.0.0
|
||||
# Release: alpha19
|
||||
# Build: 30102025145246
|
||||
# Version: 2.1.0
|
||||
# Release: alpha0
|
||||
# Build: 10112025130218
|
||||
######################################################
|
||||
|
||||
# определим текущую версию, релиз и т.д.
|
||||
|
||||
Reference in New Issue
Block a user