--- a/JavaPackage.st	Wed Jun 21 20:49:31 2017 +0200
+++ b/JavaPackage.st	Thu Jun 22 06:59:44 2017 +0200
@@ -247,7 +247,7 @@
         sel numArgs ~~ 0 ifTrue:[
             super doesNotUnderstand: aMessage
         ] ifFalse:[
-            sel first isLowercase ifTrue:[
+            sel isLowercaseFirst ifTrue:[
                 classOrPackage := JavaPackage class basicNew setName: (self name , '::' , sel) asSymbol
             ] ifFalse:[
                 | fullName |
@@ -264,6 +264,7 @@
 
     "Created: / 28-02-2012 / 20:21:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified (format): / 13-11-2014 / 16:53:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 22-06-2017 / 06:57:02 / cg"
 ! !
 
 !JavaPackage class methodsFor:'fileOut'!