diff options
-rwxr-xr-x | Master/texmf/scripts/texlive/tlmgr.pl | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl index f2c80a42460..bad958b4281 100755 --- a/Master/texmf/scripts/texlive/tlmgr.pl +++ b/Master/texmf/scripts/texlive/tlmgr.pl @@ -2135,7 +2135,6 @@ sub action_update { for my $pkg (@critical) { next unless (defined($updated{$pkg})); $infra_update_done &&= $updated{$pkg}; - my (@old_infra_files, @new_infra_files); my $oldtlp; my $newtlp; if ($updated{$pkg}) { @@ -2147,8 +2146,8 @@ sub action_update { $oldtlp = $tlmediatlpdb->get_package($pkg); $newtlp = $localtlpdb->get_package($pkg); } - die ("That shouldn't happen: $p not found in tlpdb") if !defined($newtlp); - die ("That shouldn't happen: $p not found in tlpdb") if !defined($oldtlp); + die ("That shouldn't happen: $pkg not found in tlpdb") if !defined($newtlp); + die ("That shouldn't happen: $pkg not found in tlpdb") if !defined($oldtlp); my @old_infra_files = $oldtlp->all_files; my @new_infra_files = $newtlp->all_files; my %del_files; |