[LON-CAPA-cvs] cvs: loncom(version_2_2_X) /interface loncreatecourse.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Wed, 28 Jun 2006 19:31:48 -0000
albertel Wed Jun 28 15:31:48 2006 EDT
Modified files: (Branch: version_2_2_X)
/loncom/interface loncreatecourse.pm
Log:
- disabling the creation of Course 'Group's
Index: loncom/interface/loncreatecourse.pm
diff -u loncom/interface/loncreatecourse.pm:1.93 loncom/interface/loncreatecourse.pm:1.93.2.1
--- loncom/interface/loncreatecourse.pm:1.93 Tue Jun 27 17:28:13 2006
+++ loncom/interface/loncreatecourse.pm Wed Jun 28 15:31:48 2006
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Create a course
#
-# $Id: loncreatecourse.pm,v 1.93 2006/06/27 21:28:13 raeburn Exp $
+# $Id: loncreatecourse.pm,v 1.93.2.1 2006/06/28 19:31:48 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -256,10 +256,11 @@
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 $course_home = '<select name="course_home" size="1">'."\n";
@@ -1196,11 +1197,11 @@
short_description =>
&mt('Create a new course by completing an online form.'),
},
- { internal_name => 'groupone',
- name => &mt('Create a single collaborative group space '),
- short_description =>
- &mt('Create a new group space for non-course use by completing an online form .'),
- },
+# { internal_name => 'groupone',
+# name => &mt('Create a single collaborative group space '),
+# short_description =>
+# &mt('Create a new group space for non-course use by completing an online form .'),
+# },
{ internal_name => 'batchone',
name => &mt('Create courses/groups by uploading an attributes file'),
short_description =>