summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2019-04-04 22:29:54 +0000
committerKarl Berry <karl@freefriends.org>2019-04-04 22:29:54 +0000
commita0b98c4e4bd8cba1ce4fc5d8574f369c319eb147 (patch)
tree0e634701981edf8092dcf3918b9fc3cf9a1b8320
parent1984e48c5ba64c95138cf216f357acef5b1c3d3b (diff)
/.shellarguments as well as /shellarguments, for gs 9.27
git-svn-id: svn://tug.org/texlive/trunk@50767 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Build/source/texk/gsftopk/ChangeLog5
-rw-r--r--Build/source/texk/gsftopk/render.ps29
-rw-r--r--Master/texmf-dist/dvips/gsftopk/render.ps29
3 files changed, 53 insertions, 10 deletions
diff --git a/Build/source/texk/gsftopk/ChangeLog b/Build/source/texk/gsftopk/ChangeLog
index 8a386627aca..fb67e8bd1ad 100644
--- a/Build/source/texk/gsftopk/ChangeLog
+++ b/Build/source/texk/gsftopk/ChangeLog
@@ -1,3 +1,8 @@
+2019-04-05 Paul Vojta <vojta@math.berkeley.edu>
+
+ * render.ps (shellarguments): check for /.shellarguments
+ before shellarguments.
+
2014-06-23 Akira Kakuto <kakuto@fuk.kindai.ac.jp>
* gsftopk.c: Support 64bit compilation (Windows only).
diff --git a/Build/source/texk/gsftopk/render.ps b/Build/source/texk/gsftopk/render.ps
index 2c067451b97..be9d8c8b532 100644
--- a/Build/source/texk/gsftopk/render.ps
+++ b/Build/source/texk/gsftopk/render.ps
@@ -3,7 +3,7 @@
% ========================================================================
%
-% Copyright (c) 1993-1998 Paul Vojta
+% Copyright (c) 1993-2019 Paul Vojta
%
% Permission is hereby granted, free of charge, to any person obtaining a copy
% of this software and associated documentation files (the "Software"), to
@@ -214,10 +214,29 @@ def
% Get arguments.
-shellarguments not
- {
- (You must provide arguments to the shell!\n) fatal
- }
+%
+% shellarguments is renamed as .shellarguments in gs-9.27 (early 2019)
+% The following works for gs-9.27 and gs-9.26 or older ones.
+%
+/.shellarguments where
+{
+ pop
+ .shellarguments not
+ {
+ (You must provide arguments to the shell!\n) fatal
+ }
+ if
+}
+if
+/shellarguments where
+{
+ pop
+ shellarguments not
+ {
+ (You must provide arguments to the shell!\n) fatal
+ }
+ if
+}
if
/dpi exch cvr def
diff --git a/Master/texmf-dist/dvips/gsftopk/render.ps b/Master/texmf-dist/dvips/gsftopk/render.ps
index 2c067451b97..be9d8c8b532 100644
--- a/Master/texmf-dist/dvips/gsftopk/render.ps
+++ b/Master/texmf-dist/dvips/gsftopk/render.ps
@@ -3,7 +3,7 @@
% ========================================================================
%
-% Copyright (c) 1993-1998 Paul Vojta
+% Copyright (c) 1993-2019 Paul Vojta
%
% Permission is hereby granted, free of charge, to any person obtaining a copy
% of this software and associated documentation files (the "Software"), to
@@ -214,10 +214,29 @@ def
% Get arguments.
-shellarguments not
- {
- (You must provide arguments to the shell!\n) fatal
- }
+%
+% shellarguments is renamed as .shellarguments in gs-9.27 (early 2019)
+% The following works for gs-9.27 and gs-9.26 or older ones.
+%
+/.shellarguments where
+{
+ pop
+ .shellarguments not
+ {
+ (You must provide arguments to the shell!\n) fatal
+ }
+ if
+}
+if
+/shellarguments where
+{
+ pop
+ shellarguments not
+ {
+ (You must provide arguments to the shell!\n) fatal
+ }
+ if
+}
if
/dpi exch cvr def