Diff for /loncom/interface/printout.pl between versions 1.147 and 1.148

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') {

Removed from v.1.147  
changed lines
  Added in v.1.148


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>