Index: kitdll/buildsrc/kitdll-0.0/vfs_kitdll.tcl ================================================================== --- kitdll/buildsrc/kitdll-0.0/vfs_kitdll.tcl +++ kitdll/buildsrc/kitdll-0.0/vfs_kitdll.tcl @@ -184,19 +184,20 @@ if {![info exists metadata]} { return [list] } if {$pattern == ""} { - set children [list $relative] } else { set children [::vfs::kitdll::data::getChildren $hashkey $relative] } foreach child $children { - if {![string match $pattern $child]} { - continue + if {$pattern != ""} { + if {![string match $pattern $child]} { + continue + } } unset -nocomplain metadata catch { array set metadata [::vfs::kitdll::data::getMetadata $hashkey $child]