version 1.46, 2005/04/07 06:56:24
|
version 1.47, 2005/04/07 07:34:52
|
Line 338 sub new_accumulator {
|
Line 338 sub new_accumulator {
|
sub get_selected_symbs { |
sub get_selected_symbs { |
my ($inputfield) = @_; |
my ($inputfield) = @_; |
my $field = 'form.'.$inputfield; |
my $field = 'form.'.$inputfield; |
my @Symbs; |
my @Symbs = &Apache::loncommon::get_env_multiple($field); |
if (exists($env{$field})) { |
@Symbs = (map {&Apache::lonnet::unescape($_);} @{$env{$field}}); |
if (! ref($env{$field})) { |
|
@Symbs = (&Apache::lonnet::unescape($env{$field})); |
|
} else { |
|
@Symbs = (map {&Apache::lonnet::unescape($_);} @{$env{$field}}); |
|
} |
|
} |
|
return @Symbs; |
return @Symbs; |
} |
} |
|
|