tools.completion: Add utility word for searching for a string in a sequence of strings.
parent
e9aeef7a5e
commit
f9c96628c0
|
@ -107,6 +107,9 @@ PRIVATE>
|
||||||
: colors-matching ( str -- seq )
|
: colors-matching ( str -- seq )
|
||||||
named-colors dup zip completions ;
|
named-colors dup zip completions ;
|
||||||
|
|
||||||
|
: strings-matching ( str seq -- seq' )
|
||||||
|
dup zip completions keys ;
|
||||||
|
|
||||||
<PRIVATE
|
<PRIVATE
|
||||||
|
|
||||||
: directory-paths ( directory -- alist )
|
: directory-paths ( directory -- alist )
|
||||||
|
|
Loading…
Reference in New Issue