WorkspaceCompletionSupport.st
branchjv
changeset 5737 98bc0782ffa1
parent 5696 939848e2b8cb
parent 5711 79fed9b84afe
child 5738 9498dfe97f83
equal deleted inserted replaced
5709:219a28ca67d1 5737:98bc0782ffa1
   193                                     (numFirst notNil and:[indexInSuggestions > numFirst]) ifTrue:[
   193                                     (numFirst notNil and:[indexInSuggestions > numFirst]) ifTrue:[
   194                                         indexInSuggestions := indexInSuggestions + numSkipped - 1.
   194                                         indexInSuggestions := indexInSuggestions + numSkipped - 1.
   195                                     ].    
   195                                     ].    
   196                                     actions value:indexInSuggestions
   196                                     actions value:indexInSuggestions
   197                                 ] ifFalse:[
   197                                 ] ifFalse:[
   198                                     (actions at:indexInSuggestions) value
   198                                     (actions at:indexInSuggestions) valueWithOptionalArgument:indexInSuggestions
   199                                 ].
   199                                 ].
   200                             ].
   200                             ].
   201                         ].
   201                         ].
   202                         "/ disabled - user has made his choice; so don't show more suggestions
   202                         "/ disabled - user has made his choice; so don't show more suggestions
   203                         "/ editView sensor pushUserEvent:#updateCompletionList for:self
   203                         "/ editView sensor pushUserEvent:#updateCompletionList for:self