diff --git a/ChangeLog b/ChangeLog
index 77ea992905..048199595f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+Tue Apr  2 23:56:03 2013  Tanaka Akira  <akr@fsij.org>
+
+	* lib/securerandom.rb (SecureRandom.random_bytes): Use
+	  OpenSSL::Random.random_add instead of OpenSSL::Random.seed and
+	  specify 0.0 as the entropy.
+	  [ruby-core:47308] [Bug #6928]
+
 Tue Apr  2 20:24:52 2013  Tanaka Akira  <akr@fsij.org>
 
 	* pack.c: Support Q! and q! for long long.
diff --git a/lib/securerandom.rb b/lib/securerandom.rb
index 0127838b00..227a6189c4 100644
--- a/lib/securerandom.rb
+++ b/lib/securerandom.rb
@@ -62,7 +62,7 @@ module SecureRandom
       if @pid != pid
         now = Time.now
         ary = [now.to_i, now.nsec, @pid, pid]
-        OpenSSL::Random.seed(ary.join("").to_s)
+        OpenSSL::Random.random_add(ary.join("").to_s, 0.0)
         @pid = pid
       end
       return OpenSSL::Random.random_bytes(n)