--- a/DoWhatIMeanSupport.st Tue Jan 19 07:00:23 2016 +0100
+++ b/DoWhatIMeanSupport.st Wed Jan 20 06:42:35 2016 +0100
@@ -1393,12 +1393,12 @@
possible := classOfReceiver selectors.
superClass := classOfReceiver superclass.
- [superClass notNil and:[(possible size + superClass selectors size) < 50]] whileTrue:[
+ [superClass notNil "and:[(possible size + superClass selectors size) < 500]"] whileTrue:[
possible := possible,superClass selectors.
superClass := superClass superclass.
].
possible := possible copy sort.
- choice := self askUserForCompletion:('Message to "%1"' bindWith:node name) for:codeView from:possible.
+ choice := self askUserForCompletion:('Message to "%1"' bindWith:node formattedCode) for:codeView from:possible.
choice isNil ifTrue:[
Screen current beep.
^ self