--- a/Random.st	Tue Jun 01 11:28:21 2010 +0200
+++ b/Random.st	Fri Jun 25 14:08:55 2010 +0200
@@ -528,6 +528,12 @@
     self shouldNotImplement
 ! !
 
+!Random methodsFor:'initialization'!
+
+initialize
+    self setSeed
+! !
+
 !Random methodsFor:'private'!
 
 addEntropy:entropyBytes
@@ -536,10 +542,6 @@
     ^ self
 !
 
-initialize
-    self setSeed
-!
-
 seed
     ^ seed
 !
@@ -614,9 +616,9 @@
 !Random class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/Random.st,v 1.43 2010-03-12 11:56:35 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Random.st,v 1.44 2010-06-25 12:08:55 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/Random.st,v 1.43 2010-03-12 11:56:35 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Random.st,v 1.44 2010-06-25 12:08:55 cg Exp $'
 ! !