version 1.50, 2002/08/12 18:06:55
|
version 1.51, 2002/08/14 20:38:04
|
Line 140 ENDPART
|
Line 140 ENDPART
|
my $laystyle = 'book'; |
my $laystyle = 'book'; |
my $result = ''; |
my $result = ''; |
my $number_of_columns = 1; |
my $number_of_columns = 1; |
# my $number_of_columns = $ENV{'form.numberofcolumns'}; |
|
|
|
if ($choice eq 'Standard LaTeX output for current document') { |
if ($choice eq 'Standard LaTeX output for current document') { |
#-- single document - problem, page, html, xml |
#-- single document - problem, page, html, xml |
Line 294 ENDPART
|
Line 293 ENDPART
|
} |
} |
$result = &additional_cleanup($result); |
$result = &additional_cleanup($result); |
|
|
|
|
|
|
|
|
|
|
|
|
} |
} |
#-- corrections for the different page formats |
#-- corrections for the different page formats |
if ($layout eq 'CBI' and $numberofcolumns eq '1') { |
if ($layout eq 'CBI' and $numberofcolumns eq '1') { |
Line 353 ENDPART
|
Line 348 ENDPART
|
} |
} |
print $temp_file $result; |
print $temp_file $result; |
$r->print(<<FINALEND); |
$r->print(<<FINALEND); |
<meta http-equiv="Refresh" content="0; url=/cgi-bin/printout.pl?$filename&$laystyle"> |
<meta http-equiv="Refresh" content="0; url=/cgi-bin/printout.pl?$filename&$laystyle&$numberofcolumns"> |
</body> |
</body> |
</html> |
</html> |
FINALEND |
FINALEND |