diff options
| author | Karl Berry <karl@freefriends.org> | 2008-09-30 00:05:00 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2008-09-30 00:05:00 +0000 |
| commit | add0cf86e889459ca041543cfe8e6c816f3e50f0 (patch) | |
| tree | bbdfaf8e4119d7145c179afaf76c2d82bc25bfb1 /Master/texmf-dist/scripts | |
| parent | e14e96a83ce2d29edd484a88a37ba24553afa0b5 (diff) | |
pst2pdf update (29sep08)
git-svn-id: svn://tug.org/texlive/trunk@10791 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/scripts')
| -rwxr-xr-x | Master/texmf-dist/scripts/pst2pdf/pst2pdf.pl | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/Master/texmf-dist/scripts/pst2pdf/pst2pdf.pl b/Master/texmf-dist/scripts/pst2pdf/pst2pdf.pl index 2262e9e15a2..adc88a33c59 100755 --- a/Master/texmf-dist/scripts/pst2pdf/pst2pdf.pl +++ b/Master/texmf-dist/scripts/pst2pdf/pst2pdf.pl @@ -3,8 +3,8 @@ eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}' && eval 'exec perl -S $0 $ use strict; # to be sure, that all is safe ... :-) -# v. 0.06 simplify the use of PSTricks with pdf -# 2007-08-28 (c) hvoss@tug.org +# v. 0.07 simplify the use of PSTricks with pdf +# 2008-09-29 (c) hvoss@tug.org use File::Path; # creating/removing dirs use File::Basename; # scan argument use IO::File; # simple IO operation @@ -14,7 +14,7 @@ use Getopt::Long; # read parameter my $imageDir = "images"; # where to save the images #my @imageType = ("eps","pdf","png"); # all image types (png only for Linux) my @imageType = ("eps","pdf"); # all image types -my $Iext = ".png"; # leave empty, if not a special one +my $Iext = ".pdf"; # leave empty, if not a special one my $tempDir = "."; # temporary directory my $verbose = 1; # 0 or 1, logfile my $clear = 0; # 0 or 1, clears all temporary files @@ -292,6 +292,7 @@ sub runpdfTeX() { if ($iPS > 0) { print PDF substr($_,$iPS+15); # rest of line $ignore = 0; + $type=-1; } # end Scan } elsif ( $type == 1 ) { # pspicture env my $iPST = index($_,"end{pspicture}"); @@ -329,12 +330,12 @@ __END__ =head1 NAME -B<PST2pdf> - run a TeX source, and convert all PS-related part as single images - (pdf and eps) +B<pst2pdf> - run a TeX source, and convert all PS-related part as single images + (pdf and/or eps and/or png and/or ...) and then runs pdflatex. =head1 SYNOPSIS - PSTpdf <texfile> + pst2pdf.pl <texfile[,tex]> [Options] TODO |