--- loncom/interface/loncreatecourse.pm 2004/01/31 02:07:53 1.48 +++ loncom/interface/loncreatecourse.pm 2004/02/24 23:22:27 1.51 @@ -1,7 +1,7 @@ # The LearningOnline Network # Create a course # -# $Id: loncreatecourse.pm,v 1.48 2004/01/31 02:07:53 www Exp $ +# $Id: loncreatecourse.pm,v 1.51 2004/02/24 23:22:27 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -390,7 +390,7 @@ $lt{'asov'}.

$lt{'assp'}

$lt{'oaas'}: - +

$lt{'mssg'}

@@ -564,6 +564,9 @@ ENDENHEAD } } } +# do not hide course coordinator from staff listing, +# even if privileged + $cenv{'nothideprivileged'}=$ccuname.':'.$ccdomain; if ($ENV{'form.crsxlist'}) { $cenv{'internal.crosslistings'}=$ENV{'form.crsxlist'}; my @xlists = (); @@ -668,6 +671,7 @@ ENDENHEAD # Use new Randomseed # $cenv{'rndseed'}=&Apache::lonnet::latest_rnd_algorithm_id();; + $cenv{'receiptalg'}=&Apache::lonnet::latest_receipt_algorithm_id();; # # By default, use standard grading $cenv{'grading'} = 'standard';