I've just realized that we have an autocompletion mechanism that is not
OCompletion in the image, typing cmd-q. And also, it is just querying the
Symbol table:
selectorsFromPrefix: aPrefix
"returns the value of labels from a selector prefix"
| key applicants |
aPrefix isEmptyOrNil ifTrue: [^ #()].
applicants := aPrefix first canBeGlobalVarInitial
ifTrue: [Array streamContents: [:strm |
Symbol allSymbolTablesDo: [:each |
(each notEmpty and: [each first canBeGlobalVarInitial])
ifTrue: [strm nextPut: each]]]]
ifFalse: [Array streamContents: [:strm |
Symbol allSymbolTablesDo: [:each |
(each notEmpty and: [each first canBeGlobalVarInitial not])
ifTrue: [strm nextPut: each]]]].
key := aPrefix asLowercase.
^ (applicants select: [:each | (each asLowercase beginsWith: key) and:
[each noneSatisfy: [:c | c tokenish not]]]) sort
Does anybody use it? Is it useful? Because I was loading OCompletion into
1.4 to see if it was working and I found that the 2 mechanisms live
together...
Guille