diff --git a/lib/editor.tcl b/lib/editor.tcl index b3c4a77..58fa74e 100644 --- a/lib/editor.tcl +++ b/lib/editor.tcl @@ -973,8 +973,8 @@ namespace eval Editor { grid $win.lblCounter -row 2 -column 2 -sticky we # set reqWidth [winfo reqwidth $win] - set boxX [expr [winfo rootx $w] + [expr [winfo width $nbEditor] - 350]] - set boxY [expr [winfo rooty $w] + 10] + set boxX [expr [winfo rootx $w] + [expr [winfo width $nbEditor] - 350]] + set boxY [expr [winfo rooty $w] + 10] bind $win { destroy $Editor::win diff --git a/projman.tcl b/projman.tcl index 96f1903..a2ee539 100755 --- a/projman.tcl +++ b/projman.tcl @@ -10,7 +10,7 @@ exec wish "$0" -- "$@" ###################################################### # Version: 2.0.0 # Release: alpha -# Build: 14092022165515 +# Build: 15092022154328 ###################################################### # определим текущую версию, релиз и т.д.