--- a/JavaNativeMethodImpl_OpenJDK6.st	Mon Nov 11 22:33:23 2013 +0000
+++ b/JavaNativeMethodImpl_OpenJDK6.st	Tue Nov 12 01:31:21 2013 +0000
@@ -10216,15 +10216,14 @@
     | cls |
 
     cls := this class.
-    (cls allInterfaces includes: (JavaVM classForName: 'java.lang.Cloneable' definedBy: nil)) ifFalse:[
+    cls isCloneable ifFalse:[
         JavaVM throwCloneNotSupportedException.
         ^ nil.
     ].
-
     ^ this shallowCopy.
 
     "Created: / 04-01-1998 / 19:39:26 / cg"
-    "Modified: / 08-11-2013 / 22:40:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 12-11-2013 / 01:06:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 _java_lang_Object_getClass: this