Spec for couchdb result() doesn't handle case

-type result() ::

        {ok, {{pos_integer(), string()}, headers(), body()}} |

        {ok, upload_state()} |

        {error, atom() | {atom(), [any()]}}.

preflight_lhttpc_request(Type, URL, Options) ->

    case lhttpc:request(URL, head, [], [], 20000, Options) of

{error,{{tls_alert,{handshake_failure,"TLS client: In state hello received SERVER ALERT: Fatal - Handshake Failure\n"}},

        [{lhttpc_client,send_request,1,

                        [{file,"/Users/steve.watanabe/trinity/couchdb/src/lhttpc/lhttpc_client.erl"},                         

                          {line,220}]},

         {lhttpc_client,execute,9,

                        [{file,"/Users/steve.watanabe/trinity/couchdb/src/lhttpc/lhttpc_client.erl"},

                         {line,169}]},

         {lhttpc_client,request,9,

                        [{file,"/Users/steve.watanabe/trinity/couchdb/src/lhttpc/lhttpc_client.erl"},

                         {line,93}]}]}}