Добавил поддержку ruby, yaml/ Зачаток работы со структурой файлов (переменные процедуры)
This commit is contained in:
14
projman.tcl
14
projman.tcl
@@ -115,8 +115,22 @@ if [info exists opened] {
|
||||
foreach path $opened {
|
||||
if [file isdirectory $path] {
|
||||
FileOper::ReadFolder $path
|
||||
ReadFilesFromDirectory $path $path
|
||||
# puts "aaa[dict values $project "ansible*"]"
|
||||
} elseif [file exists $path] {
|
||||
ResetModifiedFlag [FileOper::Edit $path]
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
foreach key [dict keys $project] {
|
||||
foreach f [dict get $project $key] {
|
||||
puts "----$f"
|
||||
|
||||
# dict set project $root fileName $fileName
|
||||
# puts "--- [dict get $project $key fileName]"
|
||||
# foreach v [dict get $project $key fileName] {
|
||||
# puts "--$v"
|
||||
# }
|
||||
}
|
||||
}
|
||||
|
Reference in New Issue
Block a user