diff options
author | Norbert Preining <preining@logic.at> | 2008-04-18 12:49:30 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-04-18 12:49:30 +0000 |
commit | fa2cae073a1cdb98a1caf1be23721762e8761066 (patch) | |
tree | eb204555ca955ecce8bef70aeb102dc3bdc5a7e9 | |
parent | 3b284f802aed2faf0c9f6f2416af26bdfa6dbc4e (diff) |
fix useless output.
git-svn-id: svn://tug.org/texlive/trunk@7496 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-x | Master/install-tl.pl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Master/install-tl.pl b/Master/install-tl.pl index 6184770b6b5..83973e7d867 100755 --- a/Master/install-tl.pl +++ b/Master/install-tl.pl @@ -854,20 +854,20 @@ sub do_postinst_stuff { my $perl_bindir="$TEXDIR/tlpkg/tlperl/bin"; my $perl_libdir="$TEXDIR/tlpkg/tlperl/lib"; - tllog($::LOG_NORMAL, "Prepending $plat_bindir to PATH\n"); + tllog($::LOG_DEBUG, "Prepending $plat_bindir to PATH\n"); $ENV{'PATH'}="$plat_bindir" . "$pathsep" . "$ENV{'PATH'}"; if (win32) { - tllog($::LOG_NORMAL, "Prepending $perl_bindir to PATH\n"); + tllog($::LOG_DEBUG, "Prepending $perl_bindir to PATH\n"); $ENV{'PATH'}="$perl_bindir" . "$pathsep" . "$ENV{'PATH'}"; } - tllog($::LOG_NORMAL, "\nNew PATH is now:\n"); + tllog($::LOG_DEBUG, "\nNew PATH is now:\n"); foreach my $dir (split $pathsep, $ENV{'PATH'}) { - tllog($::LOG_NORMAL, " $dir\n"); + tllog($::LOG_DEBUG, " $dir\n"); } - tllog($::LOG_NORMAL, "\n"); + tllog($::LOG_DEBUG, "\n"); if (win32) { $ENV{'PATHEXT'}=".texlua;" . "$ENV{'PATHEXT'}"; |