summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/scripts/tlgs/eps2eps.lua
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/scripts/tlgs/eps2eps.lua')
-rwxr-xr-xMaster/texmf-dist/scripts/tlgs/eps2eps.lua40
1 files changed, 40 insertions, 0 deletions
diff --git a/Master/texmf-dist/scripts/tlgs/eps2eps.lua b/Master/texmf-dist/scripts/tlgs/eps2eps.lua
new file mode 100755
index 00000000000..23da82d641d
--- /dev/null
+++ b/Master/texmf-dist/scripts/tlgs/eps2eps.lua
@@ -0,0 +1,40 @@
+#!/usr/bin/env texlua
+--*-Lua-*-
+-- $Id$
+
+-- Copyright (C) 2008-2022 Reinhard Kotucha.
+-- You may freely use, modify and/or distribute this file.
+
+doc = {
+ invocation = '[options] <inputfile> <outputfile>',
+ synopsis = '"Distill" Encapsulated PostScript.',
+ details = [=[
+ <inputfile> can be either an EPS or PS file. A single hyphen (-)
+ denotes stdin.
+
+ <outputfile> is an EPS file with a re-calculated BoundingBox.
+ A single hyphen (-) denotes stdout.
+]=]}
+
+dofile(arg[0]:match('(.*[/\\]).*$')..'tlgs-common')
+
+local command = {gsname()}
+
+addto(command,
+ '-sDEVICE=eps2write',
+ '-dDEVICEWIDTH=250000',
+ '-dDEVICEHEIGHT=250000',
+ '-o'..file.output,
+ options,
+ '-f',
+ file.input)
+
+execute(command)
+
+-- Local Variables:
+-- mode: Lua
+-- lua-indent-level: 2
+-- indent-tabs-mode: nil
+-- coding: utf-8-unix
+-- End:
+-- vim:set tabstop=2 expandtab: