--- loncom/interface/loncreatecourse.pm 2006/11/23 01:09:36 1.99 +++ loncom/interface/loncreatecourse.pm 2007/06/01 18:07:47 1.101.2.1 @@ -1,7 +1,7 @@ # The LearningOnline Network # Create a course # -# $Id: loncreatecourse.pm,v 1.99 2006/11/23 01:09:36 albertel Exp $ +# $Id: loncreatecourse.pm,v 1.101.2.1 2007/06/01 18:07:47 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -44,12 +44,13 @@ use LONCAPA; sub print_course_creation_page { my $r=shift; - my $crstype = 'Group'; - if ($env{'form.phase'} eq 'courseone') { - $crstype = 'Course'; - } + my $crstype = 'Course'; +# my $crstype = 'Group'; +# if ($env{'form.phase'} eq 'courseone') { +# $crstype = 'Course'; +# } my $defdom=$env{'request.role.domain'}; - my %host_servers = &Apache::loncommon::get_library_servers($defdom); + my %host_servers = &Apache::lonnet::get_servers($defdom,'library'); my $course_home = ''.