--- loncom/lonssl.pm	2018/12/11 13:05:40	1.22
+++ loncom/lonssl.pm	2018/12/11 15:15:26	1.23
@@ -1,5 +1,5 @@
 #
-# $Id: lonssl.pm,v 1.22 2018/12/11 13:05:40 raeburn Exp $
+# $Id: lonssl.pm,v 1.23 2018/12/11 15:15:26 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -418,7 +418,7 @@ sub has_badcert_file {
 }
 
 sub Read_Connect_Config {
-    my ($secureconf,$perlvarref,$crlchecked) = @_;
+    my ($secureconf,$perlvarref,$crlcheckedref) = @_;
     return unless (ref($secureconf) eq 'HASH');
 
     unless (ref($perlvarref) eq 'HASH') {