|
version 1.84, 2002/10/29 13:42:14
|
version 1.86, 2002/11/14 14:47:53
|
|
Line 378 ENDPART
|
Line 378 ENDPART
|
| $selectionmade = 1; |
$selectionmade = 1; |
| my %moreenv; |
my %moreenv; |
| $moreenv{'form.grade_target'}='tex'; |
$moreenv{'form.grade_target'}='tex'; |
| if ($ENV{'request.role'}=~m/^au\./ or $ENV{'request.role'}=~m/^ca\./) { |
if (&Apache::lonnet::allowed('bre',$ENV{'form.url'})) { |
| $ENV{'form.url'}=~s/http:\/\/[^\/]+//; |
$ENV{'form.url'}=~s/http:\/\/[^\/]+//; |
| } |
} |
| $moreenv{'request.filename'}=$ENV{'form.url'}; |
$moreenv{'request.filename'}=$ENV{'form.url'}; |
|
Line 518 ENDPART
|
Line 518 ENDPART
|
| } |
} |
| if ($current_output=~/\\documentclass/) { |
if ($current_output=~/\\documentclass/) { |
| my $courseidinfo = $ENV{'course.'.$ENV{'request.course.id'}.'.description'}; |
my $courseidinfo = $ENV{'course.'.$ENV{'request.course.id'}.'.description'}; |
| $current_output =~ s/\\begin{document}/\\begin{document}\\noindent\\parbox{\\minipagewidth}{\\noindent{\\textbf{$ENV{'environment.firstname'} $ENV{'environment.lastname'}} $courseidinfo - $assignment}\\hskip 1\.4in } \\vskip 5 mm /; |
$current_output =~ s/\\begin{document}/\\setlength{\\topmargin}{1cm}\\setlength{\\headheight}{1cm}\\setlength{\\headsep}{0.5cm}\\pagestyle{myheadings}\\markboth{}{{\\textbf{$fullname} $courseidinfo - $assignment}}\\begin{document} /; |
| } else { |
} else { |
| $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; |
| } |
} |
![[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