diff options
| author | Norbert Preining <preining@logic.at> | 2011-09-02 10:05:33 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2011-09-02 10:05:33 +0000 |
| commit | af87ccd2686f6c1b55932109c52db93a0667bf25 (patch) | |
| tree | 3e6bf2b6bcd507c77fc71eb9452bb6f0c5756163 /Master/tlpkg/dev | |
| parent | 2e23a7dd8959d5b7fde03401e8aea46aaf533836 (diff) | |
die if perl is to old in multi-updmap
git-svn-id: svn://tug.org/texlive/trunk@23772 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/dev')
| -rw-r--r-- | Master/tlpkg/dev/multi-updmap.pl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Master/tlpkg/dev/multi-updmap.pl b/Master/tlpkg/dev/multi-updmap.pl index a6ba04f5e35..d786c122e73 100644 --- a/Master/tlpkg/dev/multi-updmap.pl +++ b/Master/tlpkg/dev/multi-updmap.pl @@ -28,6 +28,9 @@ my ($TEXMFROOT, $TEXMFMAIN, $TEXMFVAR); BEGIN { $^W=1; + if ($] < 5.008008) { + die "$0: Perl version 5.8.8 or newer required. Aborting.\n"; + } $TEXMFROOT = `kpsewhich -var-value=TEXMFROOT`; if ($?) { print STDERR "updmap: Cannot find TEXMFROOT, aborting!\n"; |