summaryrefslogtreecommitdiff
path: root/Master/bin/win32/updmap-sys.pl
blob: f81e2afa31501250ce9d79a5546a446b1cfaac41 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
#!/usr/bin/env perl

# updmap-sys: wrapper script for updmap with TEXMFVAR and
#   TEXMFCONFIG set to TEXMFSYSVAR / TEXMFSYSCONFIG

# Copyright 2007 Reinhard Kotucha
# This file is licensed under the GNU General Public License version 2
# or any later version.

# Originally provided as a shell script written by Thomas Esser.
$^W=1;

my $TEXMFSYSVAR=`kpsewhich -var-value TEXMFSYSVAR`;
chomp ($TEXMFSYSVAR);
$ENV{"$TEXMFVAR"}="$TEXMFSYSVAR";

my $TEXMFSYSCONFIG=`kpsewhich -var-value TEXMFSYSVAR`;
chomp ($TEXMFSYSCONFIG);
$ENV{"$TEXMFCONFIG"}="$TEXMFSYSCONFIG";

exec ('updmap', @ARGV);