diff --git a/basis/tools/completion/completion.factor b/basis/tools/completion/completion.factor index f3dcb53eac..c1dace983a 100644 --- a/basis/tools/completion/completion.factor +++ b/basis/tools/completion/completion.factor @@ -2,9 +2,9 @@ ! See http://factorcode.org/license.txt for BSD license. USING: accessors arrays assocs colors.constants combinators fry -io kernel locals make math math.order namespaces sequences -sorting strings unicode.case unicode.categories unicode.data -vectors vocabs vocabs.hierarchy words ; +io io.directories kernel locals make math math.order namespaces +sequences sorting strings unicode.case unicode.categories +unicode.data vectors vocabs vocabs.hierarchy words ; IN: tools.completion @@ -97,3 +97,6 @@ PRIVATE> : colors-matching ( str -- seq ) named-colors dup zip completions ; + +: paths-matching ( str path -- seq ) + directory-files dup zip completions ;