diff options
author | Peter Breitenlohner <peb@mppmu.mpg.de> | 2011-01-10 11:21:15 +0000 |
---|---|---|
committer | Peter Breitenlohner <peb@mppmu.mpg.de> | 2011-01-10 11:21:15 +0000 |
commit | 88bfac529169e4b406b23fbd2fb6a0843bf1a150 (patch) | |
tree | f6814c2cb79d559953d732b93e4d0447391828a8 /Build/source/utils/psutils/psutils-1.17 | |
parent | 7c2ab63c28e352e1449c8e95589ec0fa7f9b94d7 (diff) |
install linked perl scripts
git-svn-id: svn://tug.org/texlive/trunk@21005 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/utils/psutils/psutils-1.17')
-rw-r--r-- | Build/source/utils/psutils/psutils-1.17/extractres.pl | 7 | ||||
-rw-r--r-- | Build/source/utils/psutils/psutils-1.17/includeres.pl | 3 | ||||
-rw-r--r-- | Build/source/utils/psutils/psutils-1.17/psmerge.pl | 3 |
3 files changed, 8 insertions, 5 deletions
diff --git a/Build/source/utils/psutils/psutils-1.17/extractres.pl b/Build/source/utils/psutils/psutils-1.17/extractres.pl index b18db0a9c24..c3bb1e92495 100644 --- a/Build/source/utils/psutils/psutils-1.17/extractres.pl +++ b/Build/source/utils/psutils/psutils-1.17/extractres.pl @@ -4,7 +4,8 @@ # Copyright (C) Angus J. C. Duggan 1991-1995 # See file LICENSE for details. -$prog = ($0 =~ s=.*/==); +$0 =~ s=.*/==; +$prog = $0; %resources = (); # list of resources included %merge = (); # list of resources extracted this time @@ -27,9 +28,9 @@ while (@ARGV) { if (defined($ENV{TMPDIR})) { # set body file name $body = "$ENV{TMPDIR}/body$$.ps"; -elsif (defined($ENV{TEMP})) { +} elsif (defined($ENV{TEMP})) { $body = "$ENV{TEMP}/body$$.ps"; -elsif (defined($ENV{TMP})) { +} elsif (defined($ENV{TMP})) { $body = "$ENV{TMP}/body$$.ps"; } else { $body = "body$$.ps"; diff --git a/Build/source/utils/psutils/psutils-1.17/includeres.pl b/Build/source/utils/psutils/psutils-1.17/includeres.pl index 48fa24f10d0..7a1b9653e97 100644 --- a/Build/source/utils/psutils/psutils-1.17/includeres.pl +++ b/Build/source/utils/psutils/psutils-1.17/includeres.pl @@ -4,7 +4,8 @@ # Copyright (C) Angus J. C. Duggan 1991-1995 # See file LICENSE for details. -$prog = ($0 =~ s=.*/==); +$0 =~ s=.*/==; +$prog = $0; %extn = ("font", ".pfa", "file", ".ps", "procset", ".ps", # resource extns "pattern", ".pat", "form", ".frm", "encoding", ".enc"); diff --git a/Build/source/utils/psutils/psutils-1.17/psmerge.pl b/Build/source/utils/psutils/psutils-1.17/psmerge.pl index a1a9db7c086..881a9926765 100644 --- a/Build/source/utils/psutils/psutils-1.17/psmerge.pl +++ b/Build/source/utils/psutils/psutils-1.17/psmerge.pl @@ -5,7 +5,8 @@ # Copyright (C) Angus J. C. Duggan 1991-1995 # See file LICENSE for details. -$prog = ($0 =~ s=.*/==); +$0 =~ s=.*/==; +$prog = $0; while ($ARGV[0] =~ /^-/) { $_ = shift; |