From: Jake Farrell <jfarrell@apache.org>
Date: Fri, 28 Sep 2012 12:08:01 +0000 (+0000)
Subject: THRIFT-1082: Thrift::FramedTransport sometimes calls close() on an undefined value
X-Git-Tag: 0.9.1~299
X-Git-Url: https://source.supwisdom.com/gerrit/gitweb?a=commitdiff_plain;h=373a26b0c63b0cab8195563aa8911fd5eb70013f;p=common%2Fthrift.git

THRIFT-1082: Thrift::FramedTransport sometimes calls close() on an undefined value
Client: perl
Patch: John Siracusa

Fixes Thrift::FramedTransport module sometimes ends up calling the close() method on an undefined value inside its own close()


git-svn-id: https://svn.apache.org/repos/asf/thrift/trunk@1391418 13f79535-47bb-0310-9956-ffa450edef68
---

diff --git a/lib/perl/lib/Thrift/FramedTransport.pm b/lib/perl/lib/Thrift/FramedTransport.pm
index b78b1989..e8e85dca 100644
--- a/lib/perl/lib/Thrift/FramedTransport.pm
+++ b/lib/perl/lib/Thrift/FramedTransport.pm
@@ -68,7 +68,9 @@ sub close
 {
     my $self = shift;
 
-    $self->{transport}->close();
+    if (defined $self->{transport}) {
+      $self->{transport}->close();
+    }
 }
 
 #