![[BACK]](/icons/back.gif){kind=icon}
Return to lonrep.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / lonnet / perl|
Return to lonrep.pm CVS log | Up to [LON-CAPA] / loncom / lonnet / perl |
| version 1.6, 2001/11/29 18:55:24 | version 1.7, 2005/03/02 22:26:36 |
|---|---|
| Line 60 sub handler { | Line 60 sub handler { |
| } | } |
| } else { | } else { |
| my $response=Apache::lonnet::repcopy($filename); | my $response=Apache::lonnet::repcopy($filename); |
| if ($response==OK) { | if ($response eq 'OK') { |
| $r->filename($filename); | $r->filename($filename); |
| return OK; | return OK; |
| } | } |