anchor.diff:  %% Contents of configuration files 
   %%
   
  -req_cnf(C) ->
  +req_cnf(Root, C) ->
       ["# Purpose: Configuration for requests (end users and CAs)."
        "\n"
  -     "ROOTDIR	        = $ENV::ROOTDIR\n"
  +     "ROOTDIR	        = " ++ Root ++ "\n"
        "\n"
   
        "[req]\n"
  
positive.code:     UsrRoot = filename:join([Root, User]),
      file:make_dir(UsrRoot),
      CnfFile = filename:join([UsrRoot, "req.cnf"]),
      file:write_file(CnfFile, req_cnf(C#config{commonName = User})),
      KeyFile = filename:join([UsrRoot, "key.pem"]), 
      ReqFile =  filename:join([UsrRoot, "req.pem"]), 
      create_req(Root, CnfFile, KeyFile, ReqFile, C),
  
negative.code:      "crlDistributionPoints=@crl_section\n"
      ];
  
  ca_cnf(Root, C = #config{issuing_distribution_point = false}) ->
      ["# Purpose: Configuration for CAs.\n"
       "\n"
       "ROOTDIR	          = " ++ Root ++ "\n"
       "default_ca	= ca\n"
       "\n"
  
  