From 6c2685553e136d80d78eee6eab193ba30277f01d Mon Sep 17 00:00:00 2001 From: Ingela Anderton Andin Date: Tue, 13 Apr 2010 14:26:55 +0000 Subject: Fixed dialyzer warning --- lib/ssl/src/ssl_connection.erl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib') diff --git a/lib/ssl/src/ssl_connection.erl b/lib/ssl/src/ssl_connection.erl index 6dd05688f0..23f13c9511 100644 --- a/lib/ssl/src/ssl_connection.erl +++ b/lib/ssl/src/ssl_connection.erl @@ -768,7 +768,7 @@ handle_event(#alert{level = ?WARNING, description = ?NO_RENEGOTIATION} = Alert, {stop, normal, State}; handle_event(#alert{level = ?WARNING, description = ?NO_RENEGOTIATION} = Alert, StateName, - #state{log_alert = Log, renegotiation = {true, From}} = State) when is_pid(From) -> + #state{log_alert = Log, renegotiation = {true, From}} = State) when not is_atom(From) -> log_alert(Log, StateName, Alert), gen_fsm:reply(From, {error, renegotiation_rejected}), {next_state, connection, next_record(State)}; @@ -2121,7 +2121,7 @@ notify_senders(SendQueue) -> gen_fsm:reply(From, {error, closed}) end, queue:to_list(SendQueue)). -notify_renegotiater({true, From}) when is_pid(From) -> +notify_renegotiater({true, From}) when not is_atom(From) -> gen_fsm:reply(From, {error, closed}); notify_renegotiater(_) -> ok. -- cgit v1.2.3