diff options
author | Karl Berry <karl@freefriends.org> | 2010-05-19 23:29:01 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2010-05-19 23:29:01 +0000 |
commit | 3e99e3af32e60033a3e2676ebf08c22c2bf8d5bc (patch) | |
tree | f1e2dd8dd94901fba1e5be8dcdc2423fac686402 /Master/texmf-dist | |
parent | 0524e407f3a836ed19615b6873ee89090c062a0b (diff) |
epstopdf 2.16
git-svn-id: svn://tug.org/texlive/trunk@18361 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist')
-rw-r--r-- | Master/texmf-dist/doc/latex/epstopdf/README | 2 | ||||
-rwxr-xr-x | Master/texmf-dist/scripts/epstopdf/epstopdf.pl | 19 |
2 files changed, 15 insertions, 6 deletions
diff --git a/Master/texmf-dist/doc/latex/epstopdf/README b/Master/texmf-dist/doc/latex/epstopdf/README index 76e56b5c792..8db80193760 100644 --- a/Master/texmf-dist/doc/latex/epstopdf/README +++ b/Master/texmf-dist/doc/latex/epstopdf/README @@ -1,4 +1,4 @@ -$Id: README 15641 2009-10-04 16:42:16Z karl $ +$Id: README 17507 2010-03-19 22:52:56Z karl $ This file is public domain. (Originally written by Karl Berry, 2009.) This is the README for the epstopdf script distribution. diff --git a/Master/texmf-dist/scripts/epstopdf/epstopdf.pl b/Master/texmf-dist/scripts/epstopdf/epstopdf.pl index d7662c96a88..9299839c41e 100755 --- a/Master/texmf-dist/scripts/epstopdf/epstopdf.pl +++ b/Master/texmf-dist/scripts/epstopdf/epstopdf.pl @@ -2,7 +2,7 @@ eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}' && eval 'exec perl -S $0 $ if 0; use strict; -# $Id: epstopdf.pl 17496 2010-03-18 17:57:31Z karl $ +# $Id: epstopdf.pl 18319 2010-05-17 16:34:21Z karl $ # (Copyright lines below.) # # Redistribution and use in source and binary forms, with or without @@ -46,6 +46,9 @@ use strict; # # emacs-page # History +# 2010/05/09 v2.16 (Karl Berry) +# * make --nogs dump edited PostScript to stdout by default +# (report from Reinhard Kotucha). # 2010/03/19 v2.15 (Karl Berry) # * let --outfile override --filter again. # * recognize MSWin64 as well as MSWin32, just in case. @@ -146,7 +149,7 @@ use strict; ### program identification my $program = "epstopdf"; -my $ident = '($Id: epstopdf.pl 17496 2010-03-18 17:57:31Z karl $) 2.15'; +my $ident = '($Id: epstopdf.pl 18319 2010-05-17 16:34:21Z karl $) 2.16'; my $copyright = <<END_COPYRIGHT ; Copyright 2009-2010 Karl Berry et al. Copyright 2002-2009 Gerben Wierda et al. @@ -334,7 +337,7 @@ if (! $OutputFilename) { } } else { debug "No Ghostscript: will write standard output"; - $OutputFilename = "-"; # no ghostscript, write to standard output + $OutputFilename = "-"; } } debug "Output filename:", $OutputFilename; @@ -408,8 +411,14 @@ if ($::opt_gs) { $outname = $GS; } else { - open($OUT, '>', $OutputFilename) or error "Cannot write \"$OutputFilename\""; - $outname = $OutputFilename; + debug "No Ghostscript: opening $OutputFilename"; + if ($OutputFilename eq "-") { + $OUT = *STDOUT; + } else { + open($OUT, '>', $OutputFilename) + || error ("Cannot write \"$OutputFilename\": $!"); + $outname = $OutputFilename; + } } binmode $OUT; |