version 1.1, 2003/01/28 00:11:49
|
version 1.2, 2003/02/20 08:57:51
|
Line 101 sub end_itemgroup {
|
Line 101 sub end_itemgroup {
|
if (!defined(@{ $Apache::response::itemgroup{'names'} })) { return; } |
if (!defined(@{ $Apache::response::itemgroup{'names'} })) { return; } |
my @names=@{ $Apache::response::itemgroup{'names'} }; |
my @names=@{ $Apache::response::itemgroup{'names'} }; |
my $randomize =&Apache::lonxml::get_param('randomize',$parstack,$safeeval); |
my $randomize =&Apache::lonxml::get_param('randomize',$parstack,$safeeval); |
if ($randomize != 'no' ) { |
if ($randomize ne 'no' ) { |
@names=&Math::Random::random_permutation(@names); |
@names=&Math::Random::random_permutation(@names); |
} |
} |
my %letter_name_map; |
my %letter_name_map; |