SmallSense__SmalltalkCompletionEngine.st
changeset 133 bd659b67811c
parent 132 7c23c51d2cfd
child 136 a1c1b160f2ca
--- a/SmallSense__SmalltalkCompletionEngine.st	Thu Oct 17 01:41:47 2013 +0100
+++ b/SmallSense__SmalltalkCompletionEngine.st	Sun Oct 20 03:10:44 2013 +0100
@@ -113,7 +113,7 @@
             (JavaPackage isNil or:[cls isJavaPackage not]) ifTrue:[
                 cls notNil ifTrue:[
                     cls isBehavior ifTrue:[
-                        result add:(ClassPO new subject: cls).
+                        result add:(ClassPO new subject: cls; showPrefix: cls isJavaClass).
                     ] ifFalse:[
                         result add:(VariablePO globalVariable: cls).
                     ]
@@ -128,7 +128,7 @@
                 (JavaPackage isNil or:[cls isJavaPackage not ]) ifTrue:[
                     cls notNil ifTrue:[
                         cls isBehavior ifTrue:[
-                            result add:(ClassPO new subject: cls).
+                            result add:(ClassPO new subject: cls; showPrefix: cls isJavaClass).
                         ] ifFalse:[
                             result add:(VariablePO globalVariable: cls).
                         ]
@@ -139,7 +139,7 @@
     ]
 
     "Created: / 26-11-2011 / 17:29:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 03-10-2013 / 16:36:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 20-10-2013 / 02:40:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 addJavaClassesInPackage: prefix
@@ -149,7 +149,7 @@
         ].
     ] ifFalse:[
         self javaClassesDo: [:cls |
-            (cls name startsWith: prefix) ifTrue:[
+            (cls binaryName startsWith: prefix) ifTrue:[
                 result add: (ClassPO new klass: cls; showPrefix: true; yourself)
             ].
         ].
@@ -157,6 +157,7 @@
     ].
 
     "Created: / 04-10-2013 / 13:09:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 20-10-2013 / 02:42:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 addMethodsForType: type