loncom/interface/loncreatecourse.pm - diff

Return to loncreatecourse.pm CVS log

Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/loncreatecourse.pm between versions 1.21 and 1.24

version 1.21, 2003/05/03 21:30:21	version 1.24, 2003/06/16 13:51:46
Line 107 $helplink	Line 107 $helplink
<p>	<p>
<b>Map:</b>	<b>Map:</b>
<input type="text" size="50" name="topmap">	<input type="text" size="50" name="topmap">
<a href="javascript:openbrowser('ccrs','topmap')">Browse</a>	<a href="javascript:openbrowser('ccrs','topmap')">Select Map</a>
</p><p>	</p><p>
<b>Do NOT generate as standard course</b>	<b>Do NOT generate as standard course</b>
(only check if you know what you are doing):	(only check if you know what you are doing):
Line 127 $helplink	Line 127 $helplink
<b>Open all assessments: </b>	<b>Open all assessments: </b>
<input type="checkbox" name="openall" checked>	<input type="checkbox" name="openall" checked>
</p>	</p>
<p>
<b>Use new random seed function: </b>
<input type="checkbox" name="rndseed" checked>
</p>
<h2>Messaging</h2>	<h2>Messaging</h2>
<p>	<p>
<b>Set course policy feedback to Course Coordinator: </b>	<b>Set course policy feedback to Course Coordinator: </b>
Line 244 ENDENHEAD	Line 240 ENDENHEAD
$envflag=1;	$envflag=1;
$cenv{'pch.roles.denied'}='st';	$cenv{'pch.roles.denied'}='st';
}	}

	# Record we've not yet viewed the Course Initialization Helper for this course
	$cenv{'course.helper.not.run'} = 1;
#	#
# Use new Randomseed	# Use new Randomseed
#	#
if ($ENV{'form.rndseed'}) {	$envflag=1;
$envflag=1;	$cenv{'rndseed'}=&Apache::lonnet::latest_rnd_algorithm_id();;
$cenv{'rndseed'}='64bit';
}
if ($envflag) {	if ($envflag) {
$r->print('Setting environment: '.	$r->print('Setting environment: '.
&Apache::lonnet::put('environment',\%cenv,$crsudom,$crsunum).'<br>');	&Apache::lonnet::put('environment',\%cenv,$crsudom,$crsunum).'<br>');

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.21
changed lines
	Added in v.1.24