fix useless output.

git-svn-id: svn://tug.org/texlive/trunk@7496 c570f23f-e606-0410-a88d-b1316a301751

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'}";