summaryrefslogtreecommitdiff
path: root/Master
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2012-05-21 13:21:20 +0000
committerNorbert Preining <preining@logic.at>2012-05-21 13:21:20 +0000
commit018e147d8f39198dbfe1e7d383145187049254b9 (patch)
tree2fd41dc8ba6d71db76fde5878b3ad5157ed32f9e /Master
parent77081f142bdfc2ef80ff714a647661a7c0d7dfb0 (diff)
update updmap.pl from source
git-svn-id: svn://tug.org/texlive/trunk@26538 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-xMaster/texmf/scripts/tetex/updmap.pl11
1 files changed, 8 insertions, 3 deletions
diff --git a/Master/texmf/scripts/tetex/updmap.pl b/Master/texmf/scripts/tetex/updmap.pl
index 38d55d1907b..5e1c38e7888 100755
--- a/Master/texmf/scripts/tetex/updmap.pl
+++ b/Master/texmf/scripts/tetex/updmap.pl
@@ -1,6 +1,6 @@
#!/usr/bin/env perl
# mupdmap: utility to maintain map files for outline fonts.
-# $Id: updmap.pl 26369 2012-05-14 15:00:53Z preining $
+# $Id: updmap.pl 26537 2012-05-21 13:20:24Z preining $
#
# Copyright 2011, 2012 Norbert Preining
# This file is licensed under the GNU General Public License version 2
@@ -33,7 +33,7 @@ BEGIN {
}
-my $version = '$Id: updmap.pl 26369 2012-05-14 15:00:53Z preining $';
+my $version = '$Id: updmap.pl 26537 2012-05-21 13:20:24Z preining $';
use Getopt::Long qw(:config no_autoabbrev ignore_case_always);
use strict;
@@ -195,11 +195,14 @@ sub main {
#
# we also determine here where changes will be saved to
if ($opts{'cnffile'}) {
+ my @tmp;
for my $f (@{$opts{'cnffile'}}) {
if (! -f $f) {
die "$prg: Config file \"$f\" not found.";
}
+ push @tmp, (win32() ? lc($f) : $f);
}
+ @{$opts{'cnffile'}} = @tmp;
# in case that config files are given on the command line, the first
# in the list is the one where changes will be written to.
($changes_config_file) = @{$opts{'cnffile'}};
@@ -207,7 +210,9 @@ sub main {
my @all_files = `kpsewhich -all updmap.cfg`;
chomp(@all_files);
my @used_files;
- push @used_files, @all_files;
+ for my $f (@all_files) {
+ push @used_files, (win32() ? lc($f) : $f);
+ }
#
# reorder used files: since we ship and manage with tlmgr
# the file in TEXMFSYSCONFIG, and TEXMFLOCAL has *lower* priority