anchor.diff:      try cipher_suites(Version, Value)
       catch
   	exit:_ ->
  +	    throw({error, {eoptions, {ciphers, Value}}});
  +	error:_->
   	    throw({error, {eoptions, {ciphers, Value}}})
       end;
   validate_option(reuse_session, Value) when is_function(Value) ->
  
positive.code:       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),
        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),
  
negative.code: 	    verify_none ->
  		{verify_none, false, ca_cert_default(verify_none, Role)};
  	    verify_peer ->
  		{verify_peer, UserFailIfNoPeerCert, ca_cert_default(verify_peer, Role)};
  	    Value ->
  		throw({error, {eoptions, {verify, Value}}})
  	end,   
  