io.directories.search: Show directory entries instead of throwing them away.
parent
e501f61141
commit
7a35d85f30
|
@ -38,7 +38,7 @@ TUPLE: directory-iterator path bfs queue ;
|
|||
dup queue>> deque-empty? [ drop f ] [
|
||||
dup queue>> pop-back
|
||||
dup directory?
|
||||
[ name>> over push-directory-entries next-directory-entry ]
|
||||
[ [ name>> swap push-directory-entries ] keep ]
|
||||
[ nip ] if
|
||||
] if ;
|
||||
|
||||
|
|
Loading…
Reference in New Issue