directory usage
parent
ef51d1bbf0
commit
12a721869c
|
@ -59,5 +59,5 @@ TUPLE: ftp-response n strings parsed ;
|
||||||
3array " " join ;
|
3array " " join ;
|
||||||
|
|
||||||
: directory-list ( -- seq )
|
: directory-list ( -- seq )
|
||||||
"" directory keys
|
"" directory-files
|
||||||
[ [ link-info ] keep file-info>string ] map ;
|
[ [ link-info ] keep file-info>string ] map ;
|
||||||
|
|
Loading…
Reference in New Issue