|
version 1.79, 2002/10/17 14:42:58
|
version 1.80, 2002/10/17 14:49:37
|
|
Line 475 ENDPART
|
Line 475 ENDPART
|
| my $primary_sequence = '/res/'.$sequence[0]; |
my $primary_sequence = '/res/'.$sequence[0]; |
| my @master_seq = &coming_from_hash($primary_sequence,$sequence[0]); |
my @master_seq = &coming_from_hash($primary_sequence,$sequence[0]); |
| #loop over students |
#loop over students |
| my $flag_latex_header_remove = 'NO'; |
my $flag_latex_header_remove = 'NO'; |
| |
my %moreenv; |
| |
$moreenv{'form.textwidth'}=$LaTeXwidth; |
| |
&Apache::lonnet::appenv(%moreenv); |
| foreach my $person (@students) { |
foreach my $person (@students) { |
| my $current_output = ''; |
my $current_output = ''; |
| my ($usersection,$username,$userdomain) = split /:/,$person; |
my ($usersection,$username,$userdomain) = split /:/,$person; |
|
Line 504 ENDPART
|
Line 507 ENDPART
|
| $current_output = '\\vskip 3mm\noindent\parbox{\minipagewidth}{\noindent\fbox{\textbf{'.$fullname.'}}\hskip 1.4in } \vskip 5 mm '.$current_output; |
$current_output = '\\vskip 3mm\noindent\parbox{\minipagewidth}{\noindent\fbox{\textbf{'.$fullname.'}}\hskip 1.4in } \vskip 5 mm '.$current_output; |
| } |
} |
| $result .= $current_output; |
$result .= $current_output; |
| |
&Apache::lonnet::delenv('form.counter'); |
| } |
} |
| $result .= '\end{document}'; |
$result .= '\end{document}'; |
| |
&Apache::lonnet::delenv('form.textwidth'); |
| } elsif ($choice eq 'Subdirectory print') { |
} elsif ($choice eq 'Subdirectory print') { |
| #prints selected problems from the subdirectory |
#prints selected problems from the subdirectory |
| $selectionmade = 6; |
$selectionmade = 6; |
![[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