diff options
| -rw-r--r-- | Build/source/texk/gsftopk/ChangeLog | 5 | ||||
| -rw-r--r-- | Build/source/texk/gsftopk/render.ps | 29 | ||||
| -rw-r--r-- | Master/texmf-dist/dvips/gsftopk/render.ps | 29 |
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 |