version 1.550, 2009/04/17 10:08:42
|
version 1.551, 2009/04/20 09:57:17
|
Line 163 sub include_pdf {
|
Line 163 sub include_pdf {
|
$base =~ s/ /\_/g; |
$base =~ s/ /\_/g; |
|
|
|
|
my $output = &print_latex_header()."\\begin{document}\n"; |
my $output = &print_latex_header(); |
$output .= '\special{ps: _begin_job_ (' |
$output .= '\special{ps: _begin_job_ (' |
.$base.'.pdf.eps'. |
.$base.'.pdf.eps'. |
')run _end_job_}'; |
')run _end_job_}'; |
Line 1474 sub print_construction_sequence {
|
Line 1474 sub print_construction_sequence {
|
} |
} |
} |
} |
elsif ($urlp =~ /\.pdf$/i) { |
elsif ($urlp =~ /\.pdf$/i) { |
$result .= &include_pdf($urlp); |
&Apache::lonnet::logthis("include_pdf 3"); |
|
|
|
my $texversion = &include_pdf($urlp); |
|
$texversion = &latex_header_footer_remove($texversion); |
|
$result .= $texversion; |
} |
} |
} |
} |
if ($helper->{VARS}->{'construction'} eq '1') {$result=~s/(\\begin{document})/$1 \\fbox\{RANDOM SEED IS $rndseed\} /;} |
if ($helper->{VARS}->{'construction'} eq '1') {$result=~s/(\\begin{document})/$1 \\fbox\{RANDOM SEED IS $rndseed\} /;} |
Line 1692 ENDPART
|
Line 1696 ENDPART
|
&& $currentURL=~/\.sequence$/ && $helper->{'VARS'}->{'construction'} eq '1') { |
&& $currentURL=~/\.sequence$/ && $helper->{'VARS'}->{'construction'} eq '1') { |
#printing content of sequence from the construction space |
#printing content of sequence from the construction space |
$currentURL=~s|\/~([^\/]+)\/|\/home\/$1\/public_html\/|; |
$currentURL=~s|\/~([^\/]+)\/|\/home\/$1\/public_html\/|; |
$result .= &print_latex_header($helper->{'VARS'}->{'LATEX_TYPE'}); |
# $result .= &print_latex_header($helper->{'VARS'}->{'LATEX_TYPE'}); |
$result .= &print_construction_sequence($currentURL, $helper, %form, |
$result .= &print_construction_sequence($currentURL, $helper, %form, |
$LaTeXwidth); |
$LaTeXwidth); |
$result .= '\end{document}'; |
$result .= '\end{document}'; |
Line 1724 ENDPART
|
Line 1728 ENDPART
|
$do_postprocessing = 0; # Don't massage the result. |
$do_postprocessing = 0; # Don't massage the result. |
|
|
} elsif ($cleanURL =~ /\.pdf$/i) { |
} elsif ($cleanURL =~ /\.pdf$/i) { |
|
&Apache::lonnet::logthis("include_pdf 1"); |
$result .= &include_pdf($cleanURL); |
$result .= &include_pdf($cleanURL); |
|
$result .= '\end{document}'; |
} else { |
} else { |
$result.=&unsupported($currentURL,$helper->{'VARS'}->{'LATEX_TYPE'}, |
$result.=&unsupported($currentURL,$helper->{'VARS'}->{'LATEX_TYPE'}, |
$helper->{'VARS'}->{'symb'}); |
$helper->{'VARS'}->{'symb'}); |
Line 1882 ENDPART
|
Line 1888 ENDPART
|
if ($i > 0) { |
if ($i > 0) { |
$result .= '\cleardoublepage'; |
$result .= '\cleardoublepage'; |
} |
} |
|
&Apache::lonnet::logthis("include_pdf 2"); |
|
|
$result .= &include_pdf($urlp); |
$result .= &include_pdf($urlp); |
if ($i != $#master_seq) { |
if ($i != $#master_seq) { |
if ($numberofcolumns eq '1') { |
if ($numberofcolumns eq '1') { |