version 1.147, 2011/02/08 12:53:39
|
version 1.148, 2011/04/26 10:47:25
|
Line 477 foreach $texfile (@texfile) {
|
Line 477 foreach $texfile (@texfile) {
|
my $ps_file = my $tempo_file = $1.'temporar.ps'; |
my $ps_file = my $tempo_file = $1.'temporar.ps'; |
my $pdf_file = $1.'.pdf'; |
my $pdf_file = $1.'.pdf'; |
$papera=~s/t/p/; |
$papera=~s/t/p/; |
$comma = "fixps --force $new_name_file"; |
#---- |
&debug("FIXPS command: $comma"); |
# The code below uses fixps to make pdf include in sequences work. |
&busy_wait_command("$comma 1>$tempo_file 2>/dev/null", |
# |
"for $status_statement now validating PS", |
# $comma = "fixps --force $new_name_file"; |
\%prog_state,$tempo_file); |
# &debug("FIXPS command: $comma"); |
|
# &busy_wait_command("$comma 1>$tempo_file 2>/dev/null", |
|
# "for $status_statement now validating PS", |
|
# \%prog_state,$tempo_file); |
|
|
|
#--- |
|
# The code below uses gs to make pdf includes in sequences work |
|
|
|
# Use gs to fix the postscript -> level 1.5 |
|
|
|
$comma = "gs -sDEVICE=pswrite -dLanguageLevel=1.5 "; |
|
&busy_wait_command("$comma -o $tempo_file $new_name_file 2>/dev/null 1>/dev/null", |
|
"for $status_statement now validating PS", |
|
\%prog_state, $tempo_file); |
|
|
|
#--- |
&busy_wait_command("mv $tempo_file $new_name_file", |
&busy_wait_command("mv $tempo_file $new_name_file", |
'File move', \%prog_state, $new_name_file); |
'File move', \%prog_state, $new_name_file); |
if ($laystyle eq 'album' and $numberofcolumns eq '2') { |
if ($laystyle eq 'album' and $numberofcolumns eq '2') { |