summaryrefslogtreecommitdiff
path: root/Master
diff options
context:
space:
mode:
authorReinhard Kotucha <reinhard.kotucha@web.de>2011-02-06 00:03:53 +0000
committerReinhard Kotucha <reinhard.kotucha@web.de>2011-02-06 00:03:53 +0000
commit85557754b4d84edcba01496301d22b4848febe05 (patch)
treec32e538c55280eee56c774ca37d9323b64c57cff /Master
parent213d44e84d9591c938b7803e25c788c0aee762be (diff)
tlpkg/dev/updmap.pl: Remove unused io redirection stuff.
git-svn-id: svn://tug.org/texlive/trunk@21311 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-xMaster/tlpkg/dev/updmap.pl32
1 files changed, 1 insertions, 31 deletions
diff --git a/Master/tlpkg/dev/updmap.pl b/Master/tlpkg/dev/updmap.pl
index 38ce18f2619..84a71af49be 100755
--- a/Master/tlpkg/dev/updmap.pl
+++ b/Master/tlpkg/dev/updmap.pl
@@ -7,8 +7,8 @@
#
###############################################################################
# $Id$
-$^W=1;
BEGIN {
+ $^W=1;
chomp($TEXMFROOT = `kpsewhich -var-value=TEXMFROOT`);
unshift (@INC, "$TEXMFROOT/tlpkg");
}
@@ -382,36 +382,6 @@ sub copyFile {
}
###############################################################################
-# start_redirection(), stop_redirection()
-# redirects stdout and stderr to log file (possibly "nul")
-###############################################################################
-sub start_redirection {
- my ($log) = @_;
-
- # start redirection if asked
- if ($log) {
- open(SO, ">&STDOUT");
- open(SE, ">&STDERR");
-
- close(STDOUT);
- close(STDERR);
-
- open(STDOUT, ">$log");
- open(STDERR,">&STDOUT");
-
- select(STDERR); $| = 1;
- select(STDOUT); $| = 1;
- }
-}
-
-sub stop_redirection {
- close(STDOUT);
- close(STDERR);
- open(STDOUT, ">&SO");
- open(STDERR, ">&SE");
-}
-
-###############################################################################
# help()
# display help message and exit
###############################################################################