Исправлена ошибка при запуске

lib/config.tcl

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

projman.tcl

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