--- a/JavaVM.st	Mon Dec 18 16:10:44 2000 +0100
+++ b/JavaVM.st	Mon Dec 18 16:29:16 2000 +0100
@@ -2060,12 +2060,14 @@
     "/ prefer the windows toolkit ...
 
     (Java classForName:'sun.awt.windows.WToolkit') notNil ifTrue:[
-	^ 'sun.awt.windows.WToolkit'.
+        ^ 'sun.awt.windows.WToolkit'.
     ].
     (Java classForName:'sun.awt.motif.MToolkit') notNil ifTrue:[
-	^ 'sun.awt.motif.MToolkit'.
-    ].
-
+        self halt:'MotifToolKit: this is untested code'.
+        ^ 'sun.awt.motif.MToolkit'.
+    ].
+
+    self halt:'TinyToolKit: this is untested code'.
     ^ 'sun.awt.tiny.TinyToolkit'.
 
 
@@ -5629,10 +5631,10 @@
 !
 
 _String_intern:nativeContext
-    UnimplementedNativeMethodSignal raise
-
-    "Created: / 12.11.1998 / 18:50:56 / cg"
-    "Modified: / 12.11.1998 / 18:52:07 / cg"
+    |jString|
+
+    jString := nativeContext receiver.
+    ^ Java intern:jString
 !
 
 _System_arraycopy:nativeContext
@@ -12687,6 +12689,6 @@
 !JavaVM class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libjava/JavaVM.st,v 1.175 2000-09-21 11:40:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libjava/JavaVM.st,v 1.176 2000-12-18 15:29:16 cg Exp $'
 ! !
 JavaVM initialize!