changed: #old_askUserForCompletion:for:from:
authorClaus Gittinger <cg@exept.de>
Tue, 23 Oct 2012 15:00:34 +0200
changeset 4146 088781f7c121
parent 4145 c7f5f603f97e
child 4147 2a271d9b129b
changed: #old_askUserForCompletion:for:from: default in completion list
DoWhatIMeanSupport.st
--- a/DoWhatIMeanSupport.st	Thu Sep 27 22:51:47 2012 +0200
+++ b/DoWhatIMeanSupport.st	Tue Oct 23 15:00:34 2012 +0200
@@ -1237,6 +1237,7 @@
            choose:(resources string:'Choose ',what)
            fromList:list
            lines:20
+           initialSelection:(list firstIfEmpty:nil)
            title:(resources string:'Code completion').
         choice isNil ifTrue:[^ nil].
     ].
@@ -2273,5 +2274,5 @@
 !DoWhatIMeanSupport class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.94 2012-08-22 22:18:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.95 2012-10-23 13:00:34 cg Exp $'
 ! !