--- loncom/Lond.pm 2018/08/18 22:07:48 1.12 +++ loncom/Lond.pm 2018/12/10 18:56:18 1.13 @@ -1,6 +1,6 @@ # The LearningOnline Network # -# $Id: Lond.pm,v 1.12 2018/08/18 22:07:48 raeburn Exp $ +# $Id: Lond.pm,v 1.13 2018/12/10 18:56:18 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -822,7 +822,7 @@ sub server_certs { ); my (%md5hash,%expected_cn,%expired,%revoked,%wrongcn,%info,$crlfile); if (ref($perlvar) eq 'HASH') { - $expected_cn{'host'} = $lonhost; + $expected_cn{'host'} = $Apache::lonnet::serverhomeIDs{$hostname}; $expected_cn{'hostname'} = 'internal-'.$hostname; my $certsdir = $perlvar->{'lonCertificateDirectory'}; if (-d $certsdir) {