version 1.64, 2004/12/10 19:59:55
|
version 1.66, 2004/12/17 22:34:53
|
Line 434 sub handler {
|
Line 434 sub handler {
|
my $rid=$colcont[$j]; |
my $rid=$colcont[$j]; |
my $metainfo = ''; |
my $metainfo = ''; |
my $esrc=&Apache::lonnet::declutter($hash{'src_'.$rid}); |
my $esrc=&Apache::lonnet::declutter($hash{'src_'.$rid}); |
|
my ($mapid,$resid)=split(/\./,$rid); |
|
my $symb=&Apache::lonnet::encode_symb($hash{'map_id_'.$mapid},$resid,$hash{'src_'.$rid}); |
if ($hash{'encrypted_'.$rid}) { |
if ($hash{'encrypted_'.$rid}) { |
|
$symb=&Apache::lonenc::encrypted($symb); |
$esrc=&Apache::lonenc::encrypted($esrc); |
$esrc=&Apache::lonenc::encrypted($esrc); |
} |
} |
unless ($hash{'src_'.$rid} =~ m-^/uploaded/-) { |
unless ($hash{'src_'.$rid} =~ m-^/uploaded/-) { |
$metainfo ='<a name="'.&Apache::lonnet::escape($esrc).'" />'. |
$metainfo ='<a name="'.&Apache::lonnet::escape($symb).'" />'. |
'<a href="'.$metalink{$rid}.'" target="LONcatInfo">'. |
'<a href="'.$metalink{$rid}.'" target="LONcatInfo">'. |
'<img src="/adm/lonMisc/cat_button.gif" border=0>'. |
'<img src="/adm/lonMisc/cat_button.gif" border=0>'. |
'</img></a>'; |
'</img></a>'; |
Line 555 sub handler {
|
Line 558 sub handler {
|
} else { |
} else { |
$r->print('\end{document}'.$number_of_columns); |
$r->print('\end{document}'.$number_of_columns); |
} |
} |
|
&Apache::lonnet::symblist($requrl,%symbhash); |
# -------------------------------------------------------------------- End page |
# -------------------------------------------------------------------- End page |
} |
} |
# ------------------------------------------------------------- End render page |
# ------------------------------------------------------------- End render page |