steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

ui.tools.listener.completion: fix use of search-vocab-names.

db4
John Benediktsson 2013-03-08 17:53:02 -08:00
parent dc395a6b31
commit 5f165095dc
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/ui/tools/listener/completion/completion.factor
View File

@ -73,7 +73,7 @@ M: definition-completion row-columns
M: word-completion row-color M: word-completion row-color
[ vocabulary>> ] [ manifest>> ] bi* { [ vocabulary>> ] [ manifest>> ] bi* {
{ [ dup not ] [ COLOR: black ] } { [ dup not ] [ COLOR: black ] }
{ [ 2dup search-vocab-names>> keys member? ] [ COLOR: black ] } { [ 2dup search-vocab-names>> in? ] [ COLOR: black ] }
{ [ over ".private" tail? ] [ COLOR: dark-red ] } { [ over ".private" tail? ] [ COLOR: dark-red ] }
[ COLOR: dark-gray ] [ COLOR: dark-gray ]
} cond 2nip ; } cond 2nip ;