summaryrefslogtreecommitdiff
path: root/Master
diff options
context:
space:
mode:
authorReinhard Kotucha <reinhard.kotucha@web.de>2007-12-09 17:17:26 +0000
committerReinhard Kotucha <reinhard.kotucha@web.de>2007-12-09 17:17:26 +0000
commitd135d43d99dbe0717ddc74114c2f93007887a9f7 (patch)
treee0fa234bcef875df818dbaca2bb91c5c5faf866b /Master
parent0bdda2407e40851c976b5230f48eb1f7db9fdab7 (diff)
TLUtils.pm: blocksize fixed
git-svn-id: svn://tug.org/texlive/trunk@5737 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm9
1 files changed, 4 insertions, 5 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index e2e5341da85..03ed19c1e9c 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -573,11 +573,10 @@ sub install_package {
my ($what, $filelistref, $target, $platform) = @_;
my $buffer;
my $offset;
- if ($::_media_ eq 'NET') {
- my $blocksize=4096;
- } else {
- my $blocksize=2048;
- }
+ my $blocksize=2048;
+
+ $blocksize=4096 if ($::_media_ eq 'NET');
+
my @filelist = @$filelistref;
my $bindir = "$::installerdir/tlpkg/bin";