From e1a095d03417df34bca27e16ef8aead35f52e4b2 Mon Sep 17 00:00:00 2001
From: Matthias Radestock <matthias@rabbitmq.com>
Date: Tue, 7 Sep 2010 05:58:19 +0100
Subject: cosmetic

---
 src/rabbit_net.erl | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

(limited to 'src/rabbit_net.erl')

diff --git a/src/rabbit_net.erl b/src/rabbit_net.erl
index b9ca6740..67e00b39 100644
--- a/src/rabbit_net.erl
+++ b/src/rabbit_net.erl
@@ -111,13 +111,12 @@ peername(Sock) when ?IS_SSL(Sock) ->
 peername(Sock) when is_port(Sock) ->
     inet:peername(Sock).
 
-
-peercert(Sock) when is_record(Sock, ssl_socket) ->
+peercert(Sock) when ?IS_SSL(Sock) ->
     case ssl:peercert(Sock#ssl_socket.ssl) of
         {ok, Cert}           -> public_key:pkix_decode_cert(Cert, otp);
         {error, no_peercert} -> no_peer_certificate
     end;
-peercert(_) ->
+peercert(Sock) when is_port(Sock) ->
     nossl.
 
 port_command(Sock, Data) when ?IS_SSL(Sock) ->
-- 
cgit v1.2.1