--- a/JavaVM.st	Wed Nov 04 20:55:47 1998 +0000
+++ b/JavaVM.st	Wed Nov 04 20:58:15 1998 +0000
@@ -2575,8 +2575,8 @@
 
                     "/ Create input stream using byte array 
 
-                    inStream := (Java classForName:'java.io.ByteArrayInputStream') basicNew.
-                    inStream invoke:'<init>([B)V' with:data.
+                    inStream := (Java classForName:'java.io.ByteArrayInputStream') newCleared.
+                    inStream perform:#'<init>([B)V' with:data.
                     ^ inStream.
                 ]
             ]
@@ -2585,7 +2585,7 @@
     ^ nil
 
     "Created: / 8.1.1998 / 16:06:56 / cg"
-    "Modified: / 27.1.1998 / 21:58:54 / cg"
+    "Modified: / 4.11.1998 / 21:05:47 / cg"
 !
 
 _ClassLoader_init:nativeContext
@@ -5453,22 +5453,22 @@
 
     button := Button in:frame.
     button action:[
-			jButtonPeer invoke:#handleAction.
-		  ].
+                        jButtonPeer perform:#handleAction.
+                  ].
 
     lbl := jButton instVarNamed:'label'.
     lbl notNil ifTrue:[
-	lbl := Java as_ST_String:lbl.
-	button label:lbl
+        lbl := Java as_ST_String:lbl.
+        button label:lbl
     ].
     self createdWindowsView:button for:jButtonPeer.
 
     WindowCreationTrace == true ifTrue:[
-	'WButtonPeer_create: ' print. frame print. ' -> ' print. button printNL.
+        'WButtonPeer_create: ' print. frame print. ' -> ' print. button printNL.
     ].
 
     "Created: / 5.1.1998 / 01:53:30 / cg"
-    "Modified: / 13.1.1998 / 22:09:15 / cg"
+    "Modified: / 4.11.1998 / 21:07:27 / cg"
 !
 
 _WButtonPeer_setLabel:nativeContext
@@ -7333,14 +7333,14 @@
     self createdWindowsView:editField for:jTextFieldPeer.
 
     editField crAction:[
-                        jTextFieldPeer invoke:#handleAction.
+                        jTextFieldPeer perform:#handleAction.
                   ].
     WindowCreationTrace == true ifTrue:[
         'WTextFieldPeer_create: ' print. frame print. ' -> ' print. editField printNL.
     ].
 
     "Created: / 5.1.1998 / 01:27:37 / cg"
-    "Modified: / 25.1.1998 / 20:34:45 / cg"
+    "Modified: / 4.11.1998 / 21:07:30 / cg"
 !
 
 _WTextFieldPeer_setEchoCharacter:nativeContext
@@ -8208,7 +8208,7 @@
 "/        ^ self
 "/    ].
 
-    jWToolKit := (Java classForName:'java.awt.Toolkit') invoke:#getDefaultToolkit.
+    jWToolKit := (Java classForName:'java.awt.Toolkit') perform:#getDefaultToolkit.
 
     jEvents do:[:jEv |
         jEv instVarNamed:'source'   put:jWin.
@@ -8223,20 +8223,18 @@
         EventTrace == true ifTrue:[
             'postEvent to Java ...' printCR.
         ].
-        jWToolKit class
-            invoke:#'postEvent(Ljava/awt/AWTEvent;)V' 
-            with:jEv.
+        jWToolKit class perform:#'postEvent(Ljava/awt/AWTEvent;)V' with:jEv.
     ].
 
     ^ false
 
     "Created: / 6.1.1998 / 20:36:36 / cg"
-    "Modified: / 18.7.1998 / 22:09:33 / cg"
+    "Modified: / 4.11.1998 / 21:06:13 / cg"
 ! !
 
 !JavaVM class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaVM.st,v 1.53 1998/11/04 18:58:57 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaVM.st,v 1.54 1998/11/04 20:57:18 cg Exp $'
 ! !
 JavaVM initialize!