Re: [PATCH] LWP::Protocol::https.pm - $res undefined at line 50

Gisle Aas (gisle@aas.no)
20 Oct 1998 12:29:00 +0200


David C Worenklein <dcw@gcm.com> writes:

> *** https.pm~   Mon Oct 19 12:11:27 1998
> --- https.pm    Mon Oct 19 12:49:51 1998
> ***************
> *** 45,57 ****
>   }
>   
>   sub _get_sock_info
>   {
>       my $self = shift;
> +     my($res, $sock) = @_;
>         LWP::Debug::trace("Checking socket info for $res");

My copy of LWP::Protocol::https does not have this LWP::Debug::trace()
line at all, so there should not be any warning to worry about.

>       $self->SUPER::_get_sock_info(@_);
> -     my($res, $sock) = @_;
>       $res->header("Client-SSL-Cipher" => $sock->get_cipher);

-- 
Gisle Aas