![[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.1420, 2020/03/30 11:04:08 | version 1.1421, 2020/05/13 01:58:16 |
|---|---|
| Line 3528 sub remove_stale_resfile { | Line 3528 sub remove_stale_resfile { |
| $stale = 1; | $stale = 1; |
| } | } |
| if ($stale) { | if ($stale) { |
| unlink($fname); | if (unlink($fname)) { |
| if ($uri!~/\.meta$/) { | if ($uri!~/\.meta$/) { |
| unlink($fname.'.meta'); | if (-e $fname.'.meta') { |
| unlink($fname.'.meta'); | |
| } | |
| } | |
| &reply("unsub:$fname",$homeserver); | |
| $removed = 1; | |
| } | } |
| &reply("unsub:$fname",$homeserver); | |
| $removed = 1; | |
| } | } |
| } | } |
| } | } |