Исправлена ошибка при запуске
This commit is contained in:
parent
122153b363
commit
c755e79517
|
@ -23,8 +23,8 @@ if [info exists env(LANG)] {
|
|||
|
||||
set ::configDefault "\[General\]
|
||||
cfgModifyDate=''
|
||||
opened=''
|
||||
editedFiles=''
|
||||
opened=
|
||||
editedFiles=
|
||||
\[GUI\]
|
||||
locale=$locale
|
||||
theme=dark
|
||||
|
@ -85,7 +85,7 @@ proc Config::write {dir} {
|
|||
|
||||
# Save an top level window geometry into config
|
||||
ini::set $cfgFile "GUI" geometry [wm geometry .]
|
||||
if {$activeProject ne ""} {
|
||||
if {[info exists activeProject] !=0 && $activeProject ne ""} {
|
||||
ini::set $cfgFile "General" opened $activeProject
|
||||
} else {
|
||||
ini::set $cfgFile "General" opened ""
|
||||
|
|
|
@ -10,7 +10,7 @@ exec wish "$0" -- "$@"
|
|||
######################################################
|
||||
# Version: 2.0.0
|
||||
# Release: alpha
|
||||
# Build: 16092022163648
|
||||
# Build: 18092022095233
|
||||
######################################################
|
||||
|
||||
# определим текущую версию, релиз и т.д.
|
||||
|
@ -111,7 +111,7 @@ source [file join $dir(lib) gui.tcl]
|
|||
|
||||
# Open the PATH if command line argument has been setting
|
||||
if [info exists opened] {
|
||||
puts $opened
|
||||
puts ">$opened"
|
||||
foreach path $opened {
|
||||
if [file isdirectory $path] {
|
||||
set activeProject $path
|
||||
|
@ -124,6 +124,7 @@ if [info exists opened] {
|
|||
}
|
||||
} else {
|
||||
if {$cfgVariables(opened) ne ""} {
|
||||
puts "<$cfgVariables(opened)"
|
||||
set activeProject $cfgVariables(opened)
|
||||
FileOper::ReadFolder $cfgVariables(opened)
|
||||
ReadFilesFromDirectory $cfgVariables(opened) $cfgVariables(opened)
|
||||
|
|
Loading…
Reference in New Issue
Block a user