diff options
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPDB.pm')
-rw-r--r-- | Master/tlpkg/TeXLive/TLPDB.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Master/tlpkg/TeXLive/TLPDB.pm b/Master/tlpkg/TeXLive/TLPDB.pm index c59768a1f95..fcde9bf872b 100644 --- a/Master/tlpkg/TeXLive/TLPDB.pm +++ b/Master/tlpkg/TeXLive/TLPDB.pm @@ -1418,7 +1418,7 @@ sub _sizes_of_packages { } my %tlpsizes; my %tlpobjs; - my $totalsize; + my $totalsize = 0; foreach my $p (@exppacks) { $tlpobjs{$p} = $self->get_package($p); my $media = $self->media_of_package($p); @@ -1438,10 +1438,10 @@ sub _sizes_of_packages { } $totalsize += $tlpsizes{$p}; } + my %realtlpsizes; if ($totalsize) { - $tlpsizes{'__TOTAL__'} = $totalsize; + $realtlpsizes{'__TOTAL__'} = $totalsize; } - my %realtlpsizes; if (!$with_deps) { for my $p (@packs) { $realtlpsizes{$p} = $tlpsizes{$p}; |