[thrift] branch master updated: THRIFT-5416: Allow UDP Sockets

[jensg]

This is an automated email from the ASF dual-hosted git repository.

jensg pushed a commit to branch master
in repository https://gitbox.apache.org/repos/asf/thrift.git


The following commit(s) were added to refs/heads/master by this push:
     new 50dd262  THRIFT-5416: Allow UDP Sockets
50dd262 is described below

commit 50dd262f282dfaf3847b61b433dcbfea6d20ac4f
Author: Brian Forbis <bfor...@athenahealth.com>
AuthorDate: Mon May 17 01:26:30 2021 -0400

    THRIFT-5416: Allow UDP Sockets
---
 lib/perl/lib/Thrift/Socket.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/perl/lib/Thrift/Socket.pm b/lib/perl/lib/Thrift/Socket.pm
index ba0db5e..034956c 100644
--- a/lib/perl/lib/Thrift/Socket.pm
+++ b/lib/perl/lib/Thrift/Socket.pm
@@ -57,7 +57,7 @@ sub new
         port         => 9090,
         recvTimeout  => 10000,
         sendTimeout  => 10000,
-
+        proto        => 'tcp',
         handle       => undef
     };
 
@@ -260,7 +260,7 @@ sub __open
     my $self = shift;
     return IO::Socket::INET->new(PeerAddr => $self->{host},
                                  PeerPort => $self->{port},
-                                 Proto    => 'tcp',
+                                 Proto    => $self->{proto},
                                  Timeout  => $self->{sendTimeout} / 1000);
 }