loncom/auth/lonauth.pm - diff

Return to lonauth.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.74, 2006/04/05 22:39:55	version 1.75, 2006/04/20 04:30:02
Line 40 use Apache::lonnet;	Line 40 use Apache::lonnet;
use Apache::lonmenu();	use Apache::lonmenu();
use Fcntl qw(:flock);	use Fcntl qw(:flock);
use Apache::lonlocal;	use Apache::lonlocal;
use POSIX qw(strftime);

my %FORM;	my %FORM;

Line 156 sub success {	Line 155 sub success {
print $idf "browser.localres=$FORM{'localres'}\n";	print $idf "browser.localres=$FORM{'localres'}\n";
}	}
print $idf "server.domain=".$r->dir_config('lonDefDomain')."\n";	print $idf "server.domain=".$r->dir_config('lonDefDomain')."\n";
my $timezone=POSIX::strftime("%Z",localtime(time));
print $idf "server.timezone=$timezone\n";
print $idf "request.course.fn=\n";	print $idf "request.course.fn=\n";
print $idf "request.course.uri=\n";	print $idf "request.course.uri=\n";
print $idf "request.course.sec=\n";	print $idf "request.course.sec=\n";