Return to lonssl.pm CVS log | Up to [LON-CAPA] / loncom |
version 1.22, 2018/12/11 13:05:40 | version 1.23, 2018/12/11 15:15:26 |
---|---|
Line 418 sub has_badcert_file { | Line 418 sub has_badcert_file { |
} | } |
sub Read_Connect_Config { | sub Read_Connect_Config { |
my ($secureconf,$perlvarref,$crlchecked) = @_; | my ($secureconf,$perlvarref,$crlcheckedref) = @_; |
return unless (ref($secureconf) eq 'HASH'); | return unless (ref($secureconf) eq 'HASH'); |
unless (ref($perlvarref) eq 'HASH') { | unless (ref($perlvarref) eq 'HASH') { |