--- a/DoWhatIMeanSupport.st Sun Dec 11 21:13:17 2016 +0100
+++ b/DoWhatIMeanSupport.st Mon Dec 12 16:41:10 2016 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 2002 by eXept Software AG
All Rights Reserved
@@ -1994,7 +1996,7 @@
"/ if there is already space before the cursor, and the parent node is not a message,
"/ do not attempt to complete the current message.
"/ If it is a message, we will look for parent-message completion also below (best2 stuff)
- (codeView characterBeforeCursor ? $ ) isSeparator ifTrue:[
+ (codeView characterBeforeCursor ? Character space) isSeparator ifTrue:[
selector isKeyword ifFalse:[
self codeCompletionForMessageTo:node into:actionBlock.
^ self
@@ -2085,7 +2087,7 @@
"/ the name of the variable from the implementation, as comment, and selected might be a good one!!
"/ Array new:1
selector isKeyword ifTrue:[
- (node arguments size = selector numArgs) ifTrue:[
+ (node arguments size = selector argumentCount) ifTrue:[
offerParenthisationAroundNode := node.
"/ Transcript show:'2:'; showCR:node.
].
@@ -2447,7 +2449,7 @@
"/
"/ info := best storeString.
"/ implClass notNil ifTrue:[
-"/ info := implClass name , ' » ' , info.
+"/ info := implClass name , ' » ' , info.
"/ ].
"/ self information:info.
"/].
@@ -5017,7 +5019,7 @@
"/
"/ info := best storeString.
"/ implClass notNil ifTrue:[
-"/ info := implClass name , ' » ' , info.
+"/ info := implClass name , ' » ' , info.
"/ ].
"/ self information:info.