version 1.89, 2002/11/18 14:35:25
|
version 1.90, 2002/11/18 15:20:56
|
Line 357 ENDDISHEADER
|
Line 357 ENDDISHEADER
|
} |
} |
} |
} |
$r->print(<<ENDMENUOUT2); |
$r->print(<<ENDMENUOUT2); |
<br /> |
<br />Number of blank pages to add: <select name="addedpages"><option selected>0</option> |
|
<option>1</option> |
|
<option>2</option> |
|
<option>3</option> |
|
</select> |
|
<br /> |
<input type="hidden" name="papersize" value="$ENV{'form.papersize'}"> |
<input type="hidden" name="papersize" value="$ENV{'form.papersize'}"> |
<input type="hidden" name="numberofstudents" value="$i"> |
<input type="hidden" name="numberofstudents" value="$i"> |
<input type="hidden" name="phase" value="three"> |
<input type="hidden" name="phase" value="three"> |
Line 389 sub additional_print_menu {
|
Line 394 sub additional_print_menu {
|
<input type="hidden" name="numberoffiles" value="$ENV{'form.numberoffiles'}"> |
<input type="hidden" name="numberoffiles" value="$ENV{'form.numberoffiles'}"> |
<input type="hidden" name="numberofcolumns" value="$ENV{'form.numberofcolumns'}"> |
<input type="hidden" name="numberofcolumns" value="$ENV{'form.numberofcolumns'}"> |
<input type="hidden" name="assignment" value="$ENV{'form.assignment'}"> |
<input type="hidden" name="assignment" value="$ENV{'form.assignment'}"> |
|
<input type="hidden" name="addedpages" value="$ENV{'form.addedpages'}"> |
Define one column layout parameters: <br /> |
Define one column layout parameters: <br /> |
<b>Width</b>: <input type="text" name="width" width="8" value="9cm"> <br /> |
<b>Width</b>: <input type="text" name="width" width="8" value="9cm"> <br /> |
<b>Height</b>: <input type="text" name="height" width="8" value="25.9cm"> <br /> |
<b>Height</b>: <input type="text" name="height" width="8" value="25.9cm"> <br /> |
Line 573 ENDPART
|
Line 579 ENDPART
|
my $courseidinfo = $ENV{'course.'.$ENV{'request.course.id'}.'.description'}; |
my $courseidinfo = $ENV{'course.'.$ENV{'request.course.id'}.'.description'}; |
$current_output =~ s/\\begin{document}/\\setlength{\\topmargin}{1cm}\\setlength{\\headheight}{1cm}\\setlength{\\headsep}{0.5cm}\\pagestyle{myheadings}\\markboth{}{{$courseidinfo - $assignment}}\\begin{document}\\noindent\\textit{\\textbf{$fullname}}\\vskip 3 mm /; |
$current_output =~ s/\\begin{document}/\\setlength{\\topmargin}{1cm}\\setlength{\\headheight}{1cm}\\setlength{\\headsep}{0.5cm}\\pagestyle{myheadings}\\markboth{}{{$courseidinfo - $assignment}}\\begin{document}\\noindent\\textit{\\textbf{$fullname}}\\vskip 3 mm /; |
} else { |
} else { |
$current_output = '\\vskip 3mm\\clearpage\\strut\\clearpage\setcounter{page}{1}\noindent\parbox{\minipagewidth}{\noindent\textit{\textbf{'.$fullname.'}}\hskip 1.4in } \vskip 5 mm '.$current_output; |
my $blanspages = ''; |
|
for (my $j=0;$j<$ENV{'form.addedpages'};$j++) {$blanspages.='\clearpage\strut\clearpage';} |
|
$current_output = '\\newline\\noindent\\makebox[\\textwidth/$number_of_columns][b]{\\hrulefill}\\newline\\noindent{\\tiny Printed from LON-CAPA\\copyright MSU{\\hfill} Licensed under GNU General Public License } \\vskip 3mm'.$blanspages.'\setcounter{page}{1}\noindent\parbox{\minipagewidth}{\noindent\textit{\textbf{'.$fullname.'}}\hskip 1.4in } \vskip 5 mm '.$current_output; |
} |
} |
$result .= $current_output; |
$result .= $current_output; |
&Apache::lonnet::delenv('form.counter'); |
&Apache::lonnet::delenv('form.counter'); |