version 1.31, 2002/10/10 19:05:32
|
version 1.32, 2002/12/02 14:39:02
|
Line 261 sub handler {
|
Line 261 sub handler {
|
$multichoicehash{'src_'.$_}=$hash{'src_'.$_}; |
$multichoicehash{'src_'.$_}=$hash{'src_'.$_}; |
$multichoicehash{'title_'.$_}=$hash{'title_'.$_}; |
$multichoicehash{'title_'.$_}=$hash{'title_'.$_}; |
$multichoicehash{'type_'.$_}=$hash{'type_'.$_}; |
$multichoicehash{'type_'.$_}=$hash{'type_'.$_}; |
|
(my $first, my $second) = $_ =~ /(\d+).(\d+)/; |
|
my $symbSrc = Apache::lonnet::declutter($hash{'src_'.$_}); |
|
$multichoicehash{'symb_'.$_} = |
|
Apache::lonnet::declutter($hash{'map_id_'.$first}.'___'. |
|
$second.'___'.$symbSrc); |
|
|
my ($choicemap,$choiceres)=split(/\./,$_); |
my ($choicemap,$choiceres)=split(/\./,$_); |
$cachehash |
$cachehash |
{&Apache::lonnet::declutter($hash{'src_'.$choicemap})} |
{&Apache::lonnet::declutter($hash{'src_'.$choicemap})} |
Line 322 ENDSTART
|
Line 328 ENDSTART
|
foreach (@possibilities) { |
foreach (@possibilities) { |
$r->print( |
$r->print( |
'<tr><td><a href="'. |
'<tr><td><a href="'. |
$multichoicehash{'src_'.$_}.'">'. |
$multichoicehash{'src_'.$_}.'?symb=' . |
|
Apache::lonnet::escape($multichoicehash{'symb_'.$_}).'">'. |
$multichoicehash{'title_'.$_}. |
$multichoicehash{'title_'.$_}. |
'</a></td><td>'.$multichoicehash{'type_'.$_}. |
'</a></td><td>'.$multichoicehash{'type_'.$_}. |
'</td></tr>'); |
'</td></tr>'); |