tools, ui.tools: Rename complete-P"? to complete-pathname?

db4
Doug Coleman 2013-03-20 16:18:30 -07:00
parent 07e223564f
commit ef98b7af53
2 changed files with 2 additions and 2 deletions

View File

@ -169,4 +169,4 @@ PRIVATE>
: complete-COLOR:? ( tokens -- ? ) "COLOR:" complete-token? ;
: complete-P"? ( tokens -- ? ) "P\"" complete-token? ;
: complete-pathname? ( tokens -- ? ) "P\"" complete-token? ;

View File

@ -95,7 +95,7 @@ M: color-completion row-color
{ [ dup complete-vocab? ] [ 2drop vocab-completion ] }
{ [ dup complete-CHAR:? ] [ 2drop char-completion ] }
{ [ dup complete-COLOR:? ] [ 2drop color-completion ] }
{ [ dup complete-P"? ] [ 2drop path-completion ] }
{ [ dup complete-pathname? ] [ 2drop path-completion ] }
[ drop <word-completion> ]
} cond ;