io.directories.search: Show directory entries instead of throwing them away.

db4
Doug Coleman 2013-04-13 15:49:03 -07:00
parent e501f61141
commit 7a35d85f30
1 changed files with 1 additions and 1 deletions

View File

@ -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 ;