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

Reply via email to