anchor.diff:        versions   = handle_option(versions, Opts, []),
         verify     = validate_option(verify, Verify),
         verify_fun = handle_option(verify_fun, Opts, VerifyFun),
  -      fail_if_no_peer_cert = validate_option(fail_if_no_peer_cert, 
  -					     FailIfNoPeerCert),
  +      fail_if_no_peer_cert = FailIfNoPeerCert,
         verify_client_once =  handle_option(verify_client_once, Opts, false),
         validate_extensions_fun = handle_option(validate_extensions_fun, Opts, undefined),
         depth      = handle_option(depth,  Opts, 1),
  
positive.code: 	    verify_none ->
  		{verify_none, false, ca_cert_default(verify_none, Role)};
  	    verify_peer ->
  		{verify_peer, proplists:get_value(fail_if_no_peer_cert,
  						  Opts, false),
  		 ca_cert_default(verify_peer, Role)};
  	    Value ->
  		throw({error, {eoptions, {verify, Value}}})
  	end,   
  
negative.code: 		end
  	end,
  
      UserFailIfNoPeerCert = validate_option(fail_if_no_peer_cert, 
  					   proplists:get_value(fail_if_no_peer_cert, Opts, false)),
  
      {Verify, FailIfNoPeerCert, CaCertDefault} = 
  	%% Handle 0, 1, 2 for backwards compatibility
  	case proplists:get_value(verify, Opts, verify_none) of
  