diff options
author | Reinhard Kotucha <reinhard.kotucha@web.de> | 2011-09-02 21:17:46 +0000 |
---|---|---|
committer | Reinhard Kotucha <reinhard.kotucha@web.de> | 2011-09-02 21:17:46 +0000 |
commit | 9f5ec1b5499424ef4641adeddc6ad616b55e6c3d (patch) | |
tree | ceeab9e115df11207d875b2813ae97e8dc45c842 /Master | |
parent | af87ccd2686f6c1b55932109c52db93a0667bf25 (diff) |
updmap.pl: abort if Perl version < 5.8.8
multi-updmap.pl: fixed little typo in comment.
git-svn-id: svn://tug.org/texlive/trunk@23773 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-x | Master/texmf/scripts/tetex/updmap.pl | 3 | ||||
-rw-r--r-- | Master/tlpkg/dev/multi-updmap.pl | 2 |
2 files changed, 4 insertions, 1 deletions
diff --git a/Master/texmf/scripts/tetex/updmap.pl b/Master/texmf/scripts/tetex/updmap.pl index 2f988ca926a..c3f42bb4a26 100755 --- a/Master/texmf/scripts/tetex/updmap.pl +++ b/Master/texmf/scripts/tetex/updmap.pl @@ -8,6 +8,9 @@ BEGIN { $^W=1; + if ($] < 5.008008) { + die "$0: Perl version 5.8.8 or newer required. Aborting.\n"; + } chomp($TEXMFROOT = `kpsewhich -var-value=TEXMFROOT`); unshift (@INC, "$TEXMFROOT/tlpkg"); } diff --git a/Master/tlpkg/dev/multi-updmap.pl b/Master/tlpkg/dev/multi-updmap.pl index d786c122e73..9704570bad9 100644 --- a/Master/tlpkg/dev/multi-updmap.pl +++ b/Master/tlpkg/dev/multi-updmap.pl @@ -9,7 +9,7 @@ # Original shell script (C) 2002 Thomas Esser # first perl variant (C) Fabrice Popineau # later adaptions by Reinhard Kotucha and Karl Berry -# the original version where licensed under the following agreement: +# the original version were licensed under the following agreement: # Anyone may freely use, modify, and/or distribute this file, without # limitation. # |