--- a/src/JavaPackage.st Sat Aug 18 06:57:46 2012 +0000
+++ b/src/JavaPackage.st Sat Aug 18 07:16:44 2012 +0000
@@ -216,8 +216,15 @@
sel first isLowercase ifTrue:[
JavaPackage class basicNew setName: (self name , '::' , sel) asSymbol
] ifFalse:[
- JavaClassAccessor fullName:
- (((self name asCollectionOfSubstringsSeparatedByAll:'::') allButFirst asStringWith:$/) , '/' , sel)
+ | fullName |
+
+ self == JAVA ifTrue:[
+ fullName := sel
+ ] ifFalse:[
+ fullName := (((self name asCollectionOfSubstringsSeparatedByAll:'::') allButFirst asStringWith:$/) , '/' , sel).
+ ].
+ JavaClassAccessor fullName: fullName
+
]
]
].