--- loncom/interface/loncreatecourse.pm 2006/07/20 22:10:22 1.93.2.4 +++ loncom/interface/loncreatecourse.pm 2006/07/20 22:09:36 1.95 @@ -1,7 +1,7 @@ # The LearningOnline Network # Create a course # -# $Id: loncreatecourse.pm,v 1.93.2.4 2006/07/20 22:10:22 albertel Exp $ +# $Id: loncreatecourse.pm,v 1.95 2006/07/20 22:09:36 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -256,11 +256,10 @@ sub copycoursefiles { sub print_course_creation_page { my $r=shift; - my $crstype = 'Course'; -# my $crstype = 'Group'; -# if ($env{'form.phase'} eq 'courseone') { -# $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 $course_home = ''.