summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-05-18 16:07:52 +0000
committerNorbert Preining <preining@logic.at>2008-05-18 16:07:52 +0000
commitc190876ab91c373a2861cde3d958987ff81fc498 (patch)
tree09e1410dab803b92961349a9908565784d2c79ff /Master/tlpkg/TeXLive
parenta8637b9bcb49517b84cecdbd52f0731d5af6ab5f (diff)
tllog($::LOGNORMAL) now logs to stdout instead of stderr ... that
was a stupidity. But it has to be rehauled anyway. git-svn-id: svn://tug.org/texlive/trunk@8209 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm9
1 files changed, 7 insertions, 2 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index 129c0576406..4a495ff6784 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -1227,8 +1227,13 @@ sub tllog {
} else {
_tllog($::LOGLEVELFILE,\@::LOGLINES,$imp,@rest);
}
- my $stderr = \*STDERR;
- _tllog($::LOGLEVELTERMINAL,$stderr,$imp,@rest);
+ my $out;
+ if ($imp == $::LOG_NORMAL) {
+ $out = \*STDOUT;
+ } else {
+ $out = \*STDERR;
+ }
+ _tllog($::LOGLEVELTERMINAL,$out,$imp,@rest);
}
sub _tllog {