fix io.directories.search on windows
parent
58557e41bf
commit
42751cb148
|
@ -6,11 +6,11 @@ locals math sequences sorting system unicode.case vocabs.loader ;
|
|||
IN: io.directories.search
|
||||
|
||||
: qualified-directory-entries ( path -- seq )
|
||||
normalize-path
|
||||
(normalize-path)
|
||||
dup directory-entries [ [ append-path ] change-name ] with map ;
|
||||
|
||||
: qualified-directory-files ( path -- seq )
|
||||
normalize-path
|
||||
(normalize-path)
|
||||
dup directory-files [ append-path ] with map ;
|
||||
|
||||
: with-qualified-directory-files ( path quot -- )
|
||||
|
|
Loading…
Reference in New Issue