From: Peter Amstutz <peter.amstutz@curoverse.com>
Date: Thu, 26 Jun 2014 15:29:25 +0000 (-0400)
Subject: Add -> indirection to  $self->{'noVerifyHostname'}
X-Git-Tag: 1.1.0~2521^2~11
X-Git-Url: https://git.arvados.org/arvados.git/commitdiff_plain/54e2fdfd72beeae2e7a904ca64fa11d02f5f0052

Add -> indirection to  $self->{'noVerifyHostname'}
---

diff --git a/sdk/perl/lib/Arvados.pm b/sdk/perl/lib/Arvados.pm
index 414272b6bc..c47f1da2d2 100644
--- a/sdk/perl/lib/Arvados.pm
+++ b/sdk/perl/lib/Arvados.pm
@@ -135,7 +135,7 @@ sub new_request
 {
     my $self = shift;
     local $ENV{'PERL_LWP_SSL_VERIFY_HOSTNAME'};
-    if ($self{'noVerifyHostname'} || ($host =~ /\.local$/)) {
+    if ($self->{'noVerifyHostname'} || ($host =~ /\.local$/)) {
         $ENV{'PERL_LWP_SSL_VERIFY_HOSTNAME'} = 0;
     }
     Arvados::Request->new();