version 1.45, 2002/03/13 21:24:24
|
version 1.50, 2002/04/10 15:30:45
|
Line 557 sub assessparms {
|
Line 557 sub assessparms {
|
if (!$pssymb) { |
if (!$pssymb) { |
$r->print('</select></tr><tr><td>Select Enclosing Map</td><td><select name=pschp>'); |
$r->print('</select></tr><tr><td>Select Enclosing Map</td><td><select name=pschp>'); |
$r->print('<option value=all>All Maps</option>'); |
$r->print('<option value=all>All Maps</option>'); |
foreach (keys %allmaps) { |
foreach (sort keys %allmaps) { |
$r->print('<option value="'.$_.'"'); |
$r->print('<option value="'.$_.'"'); |
if (($pssymb=~/^$allmaps{$_}/) || |
if (($pssymb=~/^$allmaps{$_}/) || |
($pschp eq $_)) { $r->print(' selected'); } |
($pschp eq $_)) { $r->print(' selected'); } |
Line 730 sub crsenv {
|
Line 730 sub crsenv {
|
my $output=''; |
my $output=''; |
if (! exists($values{'con_lost'})) { |
if (! exists($values{'con_lost'})) { |
my %descriptions= |
my %descriptions= |
('url' => '<b>Top Level Map</b><br><font color=red> '. |
('url' => '<b>Top Level Map</b> '. |
|
'<a href="javascript:openbrowser'. |
|
"('envform','url','sequence')\">". |
|
'Browse</a><br><font color=red> '. |
'Modification may make assessment data '. |
'Modification may make assessment data '. |
'inaccessible</font>', |
'inaccessible</font>', |
'description' => '<b>Course Description</b>', |
'description' => '<b>Course Description</b>', |
Line 749 sub crsenv {
|
Line 752 sub crsenv {
|
'Students</b><br>"<tt>st</tt>": '. |
'Students</b><br>"<tt>st</tt>": '. |
'student, "<tt>ta</tt>": '. |
'student, "<tt>ta</tt>": '. |
'TA, "<tt>in</tt>": '. |
'TA, "<tt>in</tt>": '. |
'instructor;<br><tt>role,role,...</tt>)' |
'instructor;<br><tt>role,role,...</tt>)', |
|
'spreadsheet_default_classcalc' |
|
=> '<b>Default course spreadsheet</b>'. |
|
'<a href="javascript:openbrowser'. |
|
"('envform','spreadsheet_default_classcalc'". |
|
",'spreadsheet')\">Browse</a><br>", |
|
'spreadsheet_default_studentcalc' |
|
=> '<b>Default student spreadsheet</b>'. |
|
'<a href="javascript:openbrowser'. |
|
"('envform','spreadsheet_default_calc'". |
|
",'spreadsheet')\">Browse</a><br>", |
|
'spreadsheet_default_assesscalc' |
|
=> '<b>Default assessment spreadsheet</b>'. |
|
'<a href="javascript:openbrowser'. |
|
"('envform','spreadsheet_default_assesscalc'". |
|
",'spreadsheet')\">Browse</a><br>", |
); |
); |
foreach (keys(%values)) { |
foreach (keys(%values)) { |
unless ($descriptions{$_}) { |
unless ($descriptions{$_}) { |
Line 769 sub crsenv {
|
Line 787 sub crsenv {
|
} |
} |
$r->print(<<ENDENV); |
$r->print(<<ENDENV); |
<html> |
<html> |
|
<script type="text/javascript" language="Javascript" > |
|
var editbrowser; |
|
function openbrowser(formname,elementname,only,omit) { |
|
var url = '/res/?'; |
|
if (editbrowser == null) { |
|
url += 'launch=1&'; |
|
} |
|
url += 'catalogmode=interactive&'; |
|
url += 'mode=parmset&'; |
|
url += 'form=' + formname + '&'; |
|
if (only != null) { |
|
url += 'only=' + only + '&'; |
|
} |
|
if (omit != null) { |
|
url += 'omit=' + omit + '&'; |
|
} |
|
url += 'element=' + elementname + ''; |
|
var title = 'Browser'; |
|
var options = 'scrollbars=1,resizable=1,menubar=0'; |
|
options += ',width=700,height=600'; |
|
editbrowser = open(url,title,options,'1'); |
|
editbrowser.focus(); |
|
} |
|
</script> |
<head> |
<head> |
<title>LON-CAPA Course Environment</title> |
<title>LON-CAPA Course Environment</title> |
</head> |
</head> |