![[BACK]](/icons/back.gif){kind=icon}
Return to lonacc.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / auth|
Return to lonacc.pm CVS log | Up to [LON-CAPA] / loncom / auth |
| version 1.74, 2006/04/05 22:39:55 | version 1.75, 2006/04/07 22:42:00 |
|---|---|
| Line 38 use Apache::lonlocal; | Line 38 use Apache::lonlocal; |
| use CGI::Cookie(); | use CGI::Cookie(); |
| use Fcntl qw(:flock); | use Fcntl qw(:flock); |
| sub cleanup { | |
| my ($r)=@_; | |
| if (! $r->is_initial_req()) { return DECLINED; } | |
| &Apache::lonnet::save_cache(); | |
| return OK; | |
| } | |
| sub goodbye { | |
| my ($r)=@_; | |
| &Apache::lonnet::goodbye(); | |
| return DONE; | |
| } | |
| sub handler { | sub handler { |
| my $r = shift; | my $r = shift; |
| my $requrl=$r->uri; | my $requrl=$r->uri; |