version 1.20, 2000/12/12 21:33:50
|
version 1.21, 2001/01/16 15:52:09
|
Line 10
|
Line 10
|
# 10/11,10/12,10/16 Gerd Kortemeyer) |
# 10/11,10/12,10/16 Gerd Kortemeyer) |
# |
# |
# 11/20,11/21,11/22,11/23,11/24,11/25,11/27,11/28, |
# 11/20,11/21,11/22,11/23,11/24,11/25,11/27,11/28, |
# 12/08,12/12 Gerd Kortemeyer |
# 12/08,12/12, |
|
# 16/01/01 Gerd Kortemeyer |
|
|
package Apache::lonparmset; |
package Apache::lonparmset; |
|
|
Line 497 ENDTABLEHEADFOUR
|
Line 498 ENDTABLEHEADFOUR
|
} split(/\,/,$keyp{$rid}); |
} split(/\,/,$keyp{$rid}); |
|
|
my $totalparms=scalar keys %name; |
my $totalparms=scalar keys %name; |
|
my $isdef=1; |
|
unless ($totalparms) { $totalparms=1; $isdef=0; } |
$r->print('<td bgcolor='.$defbgone. |
$r->print('<td bgcolor='.$defbgone. |
' rowspan='.$totalparms.'><tt><font size=-1>'. |
' rowspan='.$totalparms.'><tt><font size=-1>'. |
join(' / ',split(/\//,$uri)). |
join(' / ',split(/\//,$uri)). |
Line 511 ENDTABLEHEADFOUR
|
Line 514 ENDTABLEHEADFOUR
|
$r->print('<td bgcolor='.$defbgone. |
$r->print('<td bgcolor='.$defbgone. |
' rowspan='.$totalparms.'><tt><font size=-1>'. |
' rowspan='.$totalparms.'><tt><font size=-1>'. |
join(' / ',split(/\//,$mapp{$rid})).'</font></tt></td>'); |
join(' / ',split(/\//,$mapp{$rid})).'</font></tt></td>'); |
|
if ($isdef) { |
map { |
map { |
my $result=&parmval($part{$_}.'.'.$name{$_},$rid,$default{$_}); |
my $result=&parmval($part{$_}.'.'.$name{$_},$rid,$default{$_}); |
|
|
Line 575 ENDTABLEHEADFOUR
|
Line 579 ENDTABLEHEADFOUR
|
'<td bgcolor=#CCCCFF>'.&valout($outpar[$result],$type{$_}).'</td>'); |
'<td bgcolor=#CCCCFF>'.&valout($outpar[$result],$type{$_}).'</td>'); |
$r->print("</tr>\n<tr>"); |
$r->print("</tr>\n<tr>"); |
} sort keys %name; |
} sort keys %name; |
|
} else { |
|
$r->print("</tr>\n<tr>"); |
|
} |
# -------------------------------------------------- End entry for one resource |
# -------------------------------------------------- End entry for one resource |
} @ids; |
} @ids; |
$r->print('</table></form></body></html>'); |
$r->print('</table></form></body></html>'); |