|
|
@ -596,6 +596,9 @@ namespace eval punk::mix::cli { |
|
|
|
set subdirs [glob -nocomplain -dir $srcdir -type d -tail *] |
|
|
|
set subdirs [glob -nocomplain -dir $srcdir -type d -tail *] |
|
|
|
set hiddensubdirs [glob -nocomplain -dir $srcdir -type {hidden d} -tail *] |
|
|
|
set hiddensubdirs [glob -nocomplain -dir $srcdir -type {hidden d} -tail *] |
|
|
|
foreach h $hiddensubdirs { |
|
|
|
foreach h $hiddensubdirs { |
|
|
|
|
|
|
|
if {$h in [list "." ".."]} { |
|
|
|
|
|
|
|
continue |
|
|
|
|
|
|
|
} |
|
|
|
if {$h ni $subdirs} { |
|
|
|
if {$h ni $subdirs} { |
|
|
|
lappend subdirs $h |
|
|
|
lappend subdirs $h |
|
|
|
} |
|
|
|
} |
|
|
|