anchor.diff:  		      subject(proplists:get_value(subject, Opts),false)
   	      end,
   
  -    {#'OTPTBSCertificate'{serialNumber = trunc(random:uniform()*100000000)*10000 + 1,
  +    {#'OTPTBSCertificate'{serialNumber = trunc(rand:uniform()*100000000)*10000 + 1,
   			  signature    = SignAlgo,
   			  issuer       = Issuer,
   			  validity     = validity(Opts),
  
positive.code: -module(erl_make_certs).
  -include_lib("public_key/include/public_key.hrl").
  
  -export([make_cert/1, gen_rsa/1, verify_signature/3, write_pem/3]).
  -compile(export_all).
  
  %%--------------------------------------------------------------------
  %% @doc  Create and return a der encoded certificate
  
negative.code:     Max = (1 bsl (Size*8))-1,
      odd_rand(Min, Max).
  
  odd_rand(Min,Max) when Min < Max ->
      Rand = Min + rand:uniform(Max - Min - 1),
      case Rand rem 2 of
  	0 -> 
  	    Rand + 1;
  