Исправил ошибку при выходе в процедуре (Congig::Write)

This commit is contained in:
svkalinin
2022-12-16 15:00:52 +03:00
parent 3bf3b80e38
commit 3467d6a89a
2 changed files with 5 additions and 3 deletions

View File

@@ -102,8 +102,10 @@ proc Config::write {dir} {
# Добавим пути к открытым в редакторе файлам в переменную
if [info exists editors] {
foreach i [dict keys $editors] {
puts [dict get $editors $i]
lappend edited [dict get $editors $i fileFullPath]
# puts [dict get $editors $i]
if [dict exists $editors $i fileFullPath] {
lappend edited [dict get $editors $i fileFullPath]
}
}
if [info exists edited] {
ini::set $cfgFile "UserSession" editedFiles $edited