version 1.69, 2002/09/07 18:48:26
|
version 1.70, 2002/10/01 06:21:23
|
Line 449 sub print_row {
|
Line 449 sub print_row {
|
} |
} |
my $sessionval=&Apache::lonnet::EXT('resource.'.$$part{$which}. |
my $sessionval=&Apache::lonnet::EXT('resource.'.$$part{$which}. |
'.'.$$name{$which},$symbp{$rid}); |
'.'.$$name{$which},$symbp{$rid}); |
my $sessionvaltype=&Apache::lonnet::EXT('resource.'.$$part{$which}. |
# this doesn't seem to work, and I don't think is correct |
'.'.$$name{$which}.'.type',$symbp{$rid}); |
# my $sessionvaltype=&Apache::lonnet::EXT('resource.'.$$part{$which}. |
|
# '.'.$$name{$which}.'.type',$symbp{$rid}); |
|
# this seems to work |
|
my $sessionvaltype=$typeoutpar[$result]; |
$r->print('<td bgcolor=#999999 align="center"><font color=#FFFFFF>'. |
$r->print('<td bgcolor=#999999 align="center"><font color=#FFFFFF>'. |
&valout($sessionval,$sessionvaltype).' '. |
&valout($sessionval,$sessionvaltype).' '. |
'</font></td>'); |
'</font></td>'); |