--- loncom/startup.pl 2003/09/16 15:12:48 1.15 +++ loncom/startup.pl 2004/12/28 22:30:28 1.19 @@ -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/'; @@ -70,6 +69,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 +118,9 @@ use Apache::response(); use Apache::run(); use Apache::scripttag(); use Apache::structuretags(); +use Apache::portfolio(); # can't include this one due to the way it does it's BEGIN -#use Apache::loncreateuser(); +use Apache::loncreateuser(); 1; __END__