loncom/lonssl.pm - diff

Return to lonssl.pm CVS log

Up to [LON-CAPA] / loncom

version 1.6, 2004/05/28 09:37:03	version 1.7, 2004/06/01 09:53:44
Line 35 use strict;	Line 35 use strict;

# CPAN/Standard modules:	# CPAN/Standard modules:

use English;
use IO::Socket::INET;	use IO::Socket::INET;
use IO::Socket::SSL;	use IO::Socket::SSL;

Line 79 sub PromoteClientSocket {	Line 78 sub PromoteClientSocket {
my ($PlaintextSocket,	my ($PlaintextSocket,
$CACert,	$CACert,
$MyCert,	$MyCert,
$KeyFile) = @ARG;	$KeyFile) = @_;


# To create the ssl socket we need to duplicate the existing	# To create the ssl socket we need to duplicate the existing
Line 117 sub PromoteServerSocket {	Line 116 sub PromoteServerSocket {
my ($PlaintextSocket,	my ($PlaintextSocket,
$CACert,	$CACert,
$MyCert,	$MyCert,
$KeyFile) = @ARG;	$KeyFile) = @_;