Добавлена проверка на отсутствие файла и удаление из дерева

lib/files.tcl

@@ -258,6 +258,10 @@ namespace eval FileOper {
     
     proc Edit {fileFullPath} {
         global nbEditor tree
+        if {[file exists $fileFullPath] == 0} {
+            return false
+        }
+        
         set filePath [file dirname $fileFullPath]
         set fileName [file tail $fileFullPath]
         regsub -all {\.|/|\\|\s} $fileFullPath "_" itemName

lib/tree.tcl

@@ -107,7 +107,11 @@ namespace eval Tree {
                 # $tree item $id -open false
             }
             file {
-                FileOper::Edit $values
+                set v [FileOper::Edit $values]
+                if {$v eq false} {
+                    $tree delete $id
+                }
+                unset v
             }
             I[0-9]*? {
                 destroy .findVariables