close sockets before removing them, just in case

this should happen automatically when we clear the socket, but maybe
we're leaking sockets somewhere? shrug

1 files changed, 1 insertions, 0 deletions

diff --git a/lib/App/Termcast.pm b/lib/App/Termcast.pm
index 091210e..2994707 100644
--- a/lib/App/Termcast.pm
+++ b/lib/App/Termcast.pm
@@ -232,6 +232,7 @@ sub _build_socket {
 before clear_socket => sub {
     my $self = shift;
     Carp::carp("Lost connection to server ($!), reconnecting...");
+    $self->socket->close;
     ReadMode(0, $self->input)
         if $self->_has_term && $self->_term->_raw_mode;
 };