diff options
author | Norbert Preining <preining@logic.at> | 2008-01-07 13:44:55 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-01-07 13:44:55 +0000 |
commit | a5ce02963087676bb5ca99a2fc812c613855f216 (patch) | |
tree | 612108e340b0ec6389fc7a3306babe1d7b3e5cc2 /Master/tlpkg | |
parent | 4b0183ccf1cc668089020a972ceb273f9accf9f8 (diff) |
make less noisy
git-svn-id: svn://tug.org/texlive/trunk@6120 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
-rw-r--r-- | Master/tlpkg/TeXLive/TLUtils.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index 0704e632a1c..4b8766abedd 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -603,7 +603,7 @@ is not taken into account (should be fixed!). sub install_package { sub mysystem { my $cmd = shift; - print "DEBUG: $cmd\n"; + # print "DEBUG: $cmd\n"; system("$cmd"); } my ($what, $filelistref, $target, $platform) = @_; @@ -648,7 +648,7 @@ sub install_package { mkdirhier("$target/temp"); mysystem("wget -nv -O $target\\temp\\$fn $what"); mysystem("lzma d $target\\temp\\$fn $target\\temp\\$tarfile"); - mysystem("pushd $target & $bindir\\bsdtar.exe -xvf temp\\$tarfile"); + mysystem("pushd $target & $bindir\\bsdtar.exe -xf temp\\$tarfile"); unlink("$target\\temp\\$tarfile"); unlink("$target\\temp\\$fn"); } else { @@ -661,7 +661,7 @@ sub install_package { $tarfile =~ s/\.lzma$//; mkdirhier("$target/temp"); mysystem("$bindir\\lzma.exe d $what $target\\temp\\$tarfile"); - mysystem("pushd $target & $bindir\\bsdtar.exe -xvf temp\\$tarfile"); + mysystem("pushd $target & $bindir\\bsdtar.exe -xf temp\\$tarfile"); unlink("$target\\temp\\$tarfile"); } else { system "cat $what|$lzmadec|/bin/tar -xf - -C $target"; |