--- a/DoWhatIMeanSupport.st Thu Jul 07 18:39:30 2011 +0200
+++ b/DoWhatIMeanSupport.st Fri Jul 08 08:50:09 2011 +0200
@@ -161,6 +161,9 @@
askUserForCompletion:what for:codeView at:position from:allTheBest
|list choice lastChoice|
+ "/ cg: until the new stuff works,...
+ ^ self old_askUserForCompletion:what for:codeView from:allTheBest.
+
allTheBest isEmpty ifTrue:[
^ nil
].
@@ -171,9 +174,7 @@
LastChoices notNil ifTrue:[
lastChoice := LastChoices at:what ifAbsent:nil.
lastChoice notNil ifTrue:[
- list :=
- { lastChoice.
- nil } , (list copyWithout:lastChoice).
+ list := { lastChoice. nil } , (list copyWithout:lastChoice).
].
].
choice := Tools::CodeCompletionMenu
@@ -187,6 +188,7 @@
^ choice
"Created: / 16-02-2010 / 10:09:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified (format): / 08-07-2011 / 08:49:35 / cg"
!
askUserForCompletion:what for:codeView from:allTheBest
@@ -2170,5 +2172,5 @@
!DoWhatIMeanSupport class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.82 2011-07-06 12:18:39 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.83 2011-07-08 06:50:09 cg Exp $'
! !