Refactoring BIO: small test correction

Reviewed-by: Viktor Dukhovni <viktor@openssl.org>

diff --git a/util/TLSProxy/Proxy.pm b/util/TLSProxy/Proxy.pm
index 70824865612a2c30d776eab1b6be69ed98f611ae..dab3d34357f7ebd9c646fe644dcd3797efaf44c2 100644 (file)
--- a/util/TLSProxy/Proxy.pm
+++ b/util/TLSProxy/Proxy.pm
@@ -209,7 +209,7 @@ sub clientstart
     }
 
     # Create the Proxy socket
-    my $proxaddr = $self->server_addr;
+    my $proxaddr = $self->proxy_addr;
     $proxaddr =~ s/[\[\]]//g; # Remove [ and ]
     my $proxy_sock = $IP_factory->(
         LocalHost   => $proxaddr,