--- loncom/interface/loncreatecourse.pm 2004/04/16 13:33:41 1.54 +++ loncom/interface/loncreatecourse.pm 2004/05/04 20:43:21 1.55 @@ -1,7 +1,7 @@ # The LearningOnline Network # Create a course # -# $Id: loncreatecourse.pm,v 1.54 2004/04/16 13:33:41 albertel Exp $ +# $Id: loncreatecourse.pm,v 1.55 2004/05/04 20:43:21 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -301,6 +301,7 @@ sub print_course_creation_page { 'nech' => "Notification of enrollment changes", 'nccl' => "Notification to course coordinator via LON-CAPA message when enrollment changes occur during the automated update?", 'irsp' => "Include retrieval of student photographs?", + 'rshm' => 'Resource Space Home', 'opco' => "Open Course" ); $r->print(< $lt{'scpf'}: -

+
$lt{'scfc'}:

@@ -412,15 +413,12 @@ $lt{'asov'}. $lt{'snak'}:

-

$lt{'cc'}

+

$lt{'rshm'}

+

+$lt{'rshm'}: + +

-$lt{'user'}: -

-$lt{'dmn'}: $domform -

-$lt{'ierc'}: - -

$lt{'aens'}

$lt{'aesc'}

@@ -449,7 +447,18 @@ $lt{'nccl'}
value="0" checked="true" />$lt{'no'}

$lt{'irsp'} $lt{'yes'} $lt{'no'} +

+
+

$lt{'cc'}

+

+$lt{'user'}: +

+$lt{'dmn'}: $domform

+$lt{'ierc'}: + +

+

@@ -665,6 +674,10 @@ ENDENHEAD $cenv{'question.email'}=$ccuname.':'.$ccdomain; } } + if ($ENV{'form.reshome'}) { + $cenv{'reshome'}=$ENV{'form.reshome'}.'/'; + $cenv{'reshome'}=~s/\/+$/\//; + } if ($ENV{'form.setkeys'}) { $cenv{'keyaccess'}='yes'; }