|
version 1.235, 2003/09/16 20:03:12
|
version 1.236, 2003/09/17 17:32:56
|
|
Line 775 ENDPART
|
Line 775 ENDPART
|
| &Apache::lonnet::delenv('form.counter'); |
&Apache::lonnet::delenv('form.counter'); |
| &Apache::lonxml::init_counter(); |
&Apache::lonxml::init_counter(); |
| for (my $i=0;$i<=$#master_seq;$i++) { |
for (my $i=0;$i<=$#master_seq;$i++) { |
| $master_seq[$i]=~/___\d+___(.*)$/; |
my (undef,undef,$urlp)=&Apache::lonnet::decode_symb($master_seq[$i]); |
| my $urlp='/res/'.$1; |
$urlp=&Apache::lonnet::declutter($urlp); |
| if ($helper->{'VARS'}->{'PRINT_TYPE'} eq 'map_problems') { |
if ($helper->{'VARS'}->{'PRINT_TYPE'} eq 'map_problems') { |
| $selectionmade = 2; |
$selectionmade = 2; |
| } elsif ($helper->{'VARS'}->{'PRINT_TYPE'} eq 'map_problems_pages') { |
} elsif ($helper->{'VARS'}->{'PRINT_TYPE'} eq 'map_problems_pages') { |
|
Line 785 ENDPART
|
Line 785 ENDPART
|
| $selectionmade = 4; |
$selectionmade = 4; |
| } |
} |
| $form{'symb'}=$master_seq[$i]; |
$form{'symb'}=$master_seq[$i]; |
| $master_seq[$i]=~/(.*)___\d*___/; |
my ($sequence)=&Apache::lonnet::decode_symb($master_seq[$i]); |
| my $assignment=&Apache::lonxml::latex_special_symbols(&Apache::lonnet::gettitle($1),'header'); #tittle of the assignment which contains this problem |
my $assignment=&Apache::lonxml::latex_special_symbols(&Apache::lonnet::gettitle($sequence),'header'); #tittle of the assignment which contains this problem |
| #&Apache::lonnet::logthis("Trying to get $urlp with symb $master_seq[$i]"); |
#&Apache::lonnet::logthis("Trying to get $urlp with symb $master_seq[$i]"); |
| my $texversion=&Apache::lonnet::ssi($urlp,%form); |
my $texversion=&Apache::lonnet::ssi($urlp,%form); |
| if ($urlp=~/\.page$/) { |
if ($urlp=~/\.page$/) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonprintout.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface