Diff for /loncom/lonnet/perl/lonnet.pm between versions 1.1467 and 1.1468

version 1.1467, 2021/10/07 15:51:16 version 1.1468, 2021/10/11 00:27:15
Line 2304  sub retrieve_inst_usertypes { Line 2304  sub retrieve_inst_usertypes {
   
 sub is_domainimage {  sub is_domainimage {
     my ($url) = @_;      my ($url) = @_;
     if ($url=~m-^/+res/+($match_domain)/+\1\-domainconfig/+(img|logo|domlogo)/+[^/]-) {      if ($url=~m-^/+res/+($match_domain)/+\1\-domainconfig/+(img|logo|domlogo|login)/+[^/]-) {
         if (&domain($1) ne '') {          if (&domain($1) ne '') {
             return '1';              return '1';
         }          }

Removed from v.1.1467  
changed lines
  Added in v.1.1468


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