version 1.95, 2004/10/27 18:17:43
|
version 1.96, 2005/01/11 19:45:18
|
Line 353 my @Fields = (
|
Line 353 my @Fields = (
|
# selectable => 'no', |
# selectable => 'no', |
# defaultselected => 'yes', |
# defaultselected => 'yes', |
# }, |
# }, |
|
## weight included for research purposes. Commented out most of the time. |
|
# { name => 'weight', |
|
# title => 'weight', |
|
# align => 'right', |
|
# color => '#FFFFFF', |
|
# sortable => 'no', |
|
# graphable => 'no', |
|
# long_title => 'Problem weight (for instructor)', |
|
# selectable => 'no', |
|
# defaultselected => 'yes', |
|
# }, |
); |
); |
|
|
my @SeqFields = ( |
my @SeqFields = ( |
Line 1587 sub get_statistics {
|
Line 1598 sub get_statistics {
|
# &Apache::lonnet::EXT('resource.'.$part.'.maxtries',$symb); |
# &Apache::lonnet::EXT('resource.'.$part.'.maxtries',$symb); |
# $data->{'hinttries'} = |
# $data->{'hinttries'} = |
# &Apache::lonnet::EXT('resource.'.$part.'.hinttries',$symb); |
# &Apache::lonnet::EXT('resource.'.$part.'.hinttries',$symb); |
|
# $data->{'weight'} = |
|
# &Apache::lonnet::EXT('resource.'.$part.'.weight',$symb); |
# $data->{'resptypes'} = join(',',@{$resource->{'partdata'}->{$part}->{'ResponseTypes'}}); |
# $data->{'resptypes'} = join(',',@{$resource->{'partdata'}->{$part}->{'ResponseTypes'}}); |
return $data; |
return $data; |
} |
} |