![[BACK]](/icons/back.gif){kind=icon}
Return to lonnet.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / lonnet / perl|
Return to lonnet.pm CVS log | Up to [LON-CAPA] / loncom / lonnet / perl |
| version 1.1305, 2016/04/02 04:31:03 | version 1.1306, 2016/04/15 18:53:38 |
|---|---|
| Line 1895 sub retrieve_inst_usertypes { | Line 1895 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)/+[^/]-) { |
| if (&domain($1) ne '') { | if (&domain($1) ne '') { |
| return '1'; | return '1'; |
| } | } |