Diff for /loncom/loncron between versions 1.105 and 1.106

version 1.105, 2017/10/20 11:54:54 version 1.106, 2018/07/18 13:44:55
Line 942  sub write_hosttypes { Line 942  sub write_hosttypes {
     }      }
 }  }
   
   sub update_revocation_list {
       if (&Apache::lonnet::fetch_crl_pemfile() eq 'ok') {
           print "Certificate Revocation List (from CA) updated.\n";
       } else {
           print "Certificate Revocation List from (CA) not updated.\n";
       }
   }
   
 sub send_mail {  sub send_mail {
     my $defdom = $perlvar{'lonDefDomain'};      my $defdom = $perlvar{'lonDefDomain'};
     my $origmail = $perlvar{'lonAdmEMail'};      my $origmail = $perlvar{'lonAdmEMail'};
Line 1134  sub main () { Line 1142  sub main () {
  &write_checksums();   &write_checksums();
         &write_connection_config();          &write_connection_config();
         &write_hosttypes();          &write_hosttypes();
           &update_revocation_list();
  if ($totalcount>200 && !$noemail) { &send_mail(); }   if ($totalcount>200 && !$noemail) { &send_mail(); }
     }      }
 }  }

Removed from v.1.105  
changed lines
  Added in v.1.106


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>