--- a/RandomGenerator.st	Wed Mar 05 02:01:35 2014 +0100
+++ b/RandomGenerator.st	Wed Mar 05 12:38:57 2014 +0100
@@ -108,7 +108,7 @@
         "OperatingSystem knows how to get random bytes"
         RandFile := true.
         SharedRandomGenerator := self basicNew.
-        ^ SharedGenerator.
+        ^ SharedRandomGenerator.
     ] ifFalse:[
         RandFile isNil ifTrue:[
             self openRandFile.
@@ -377,11 +377,11 @@
 !RandomGenerator class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/RandomGenerator.st,v 1.11 2014-03-03 14:19:01 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/RandomGenerator.st,v 1.12 2014-03-05 11:38:57 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/RandomGenerator.st,v 1.11 2014-03-03 14:19:01 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/RandomGenerator.st,v 1.12 2014-03-05 11:38:57 stefan Exp $'
 ! !