--- loncom/startup.pl 2003/02/10 21:19:59 1.11 +++ loncom/startup.pl 2003/09/16 15:12:48 1.15 @@ -1,9 +1,13 @@ #!/usr/bin/perl -use Apache(); +if ($mod_perl::VERSION > 1.99) { + use Apache::compat(); +} else { + use Apache(); +} use lib '/home/httpd/lib/perl'; #use lib '/usr/lib/perl5/site_perl/5.005/'; -#use lib '/usr/lib/perl5/site_perl/5.005/i386-linux/'; +use lib '/usr/lib/perl5/site_perl/5.6.0/i386-linux/'; use Apache::Constants qw(:common :http :methods); use CGI::Cookie(); use CGI qw(-compile standard); @@ -72,11 +76,9 @@ use Apache::lonroles(); use Apache::lontrans(); use Apache::hint(); use Apache::inputtags(); -use Apache::localauth(); use Apache::lonambiguous(); use Apache::lonchat(); use Apache::lonchatfetch(); -use Apache::lonclassifystudents(); use Apache::loncommunicate(); use Apache::loncoursedata(); use Apache::loncreatecourse(); @@ -92,6 +94,10 @@ use Apache::lonsearchcat(); use Apache::lonsequence(); use Apache::lonsimplepage(); use Apache::lonspreadsheet(); +use Apache::Spreadsheet(); +use Apache::classcalc(); +use Apache::studentcalc(); +use Apache::assesscalc(); use Apache::lonstudentassessment(); use Apache::lonsyllabus(); use Apache::lontokacc();