--- loncom/startup.pl 2003/09/16 15:12:48 1.15 +++ loncom/startup.pl 2005/06/29 03:55:49 1.21 @@ -1,10 +1,9 @@ #!/usr/bin/perl -if ($mod_perl::VERSION > 1.99) { - use Apache::compat(); -} else { - use Apache(); -} +BEGIN { + eval "use Apache::compat();"; + eval "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.6.0/i386-linux/'; @@ -54,7 +53,6 @@ use Apache::loncommon(); use Apache::lonquickgrades(); use Apache::lonaboutme(); use Apache::lonannounce(); -use Apache::lonassignments(); use Apache::lonbulletin(); use Apache::londropadd(); use Apache::lonerrorhandler(); @@ -70,6 +68,8 @@ use Apache::lonpageflip(); use Apache::lonpage(); use Apache::lonpreferences(); use Apache::lonprintout(); +use Apache::lonsubmissiontimeanalysis(); +use Apache::lonstudentsubmissions(); use Apache::lonproblemanalysis(); use Apache::lonproblemstatistics(); use Apache::lonroles(); @@ -117,8 +117,10 @@ use Apache::response(); use Apache::run(); use Apache::scripttag(); use Apache::structuretags(); +use Apache::portfolio(); +use Apache::bridgetask(); # can't include this one due to the way it does it's BEGIN -#use Apache::loncreateuser(); +use Apache::loncreateuser(); 1; __END__