version 1.40, 2005/07/12 07:00:28
|
version 1.41, 2006/04/13 19:07:33
|
Line 31 package Apache::loncacc;
|
Line 31 package Apache::loncacc;
|
|
|
use strict; |
use strict; |
use Apache::Constants qw(:common :http :methods REDIRECT); |
use Apache::Constants qw(:common :http :methods REDIRECT); |
use Apache::File; |
|
use CGI::Cookie(); |
use CGI::Cookie(); |
use Fcntl qw(:flock); |
use Fcntl qw(:flock); |
use Apache::lonlocal; |
use Apache::lonlocal; |
use Apache::lonnet; |
use Apache::lonnet; |
|
use Apache::lonacc; |
|
|
sub constructaccess { |
sub constructaccess { |
my ($url,$ownerdomain)=@_; |
my ($url,$ownerdomain)=@_; |
Line 95 sub handler {
|
Line 94 sub handler {
|
|
|
# -------------------------------------------------------- Load POST parameters |
# -------------------------------------------------------- Load POST parameters |
|
|
&Apache::loncommon::get_posted_cgi($r); |
&Apache::lonacc::get_posted_cgi($r); |
|
|
return OK; |
return OK; |
} else { |
} else { |