diff options
author | Karl Berry <karl@freefriends.org> | 2008-11-10 23:55:37 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2008-11-10 23:55:37 +0000 |
commit | c13aeb762078cf6383244d7b1b4ebc7fbb0ad09e (patch) | |
tree | bc2e8bc4f0f2d7f9fc64d65340228599ddd4428f /Master | |
parent | 812c41526b6e9b87e50bcb0300171782eab30812 (diff) |
message tweaks
git-svn-id: svn://tug.org/texlive/trunk@11248 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-x | Master/texmf/scripts/texlive/tlmgr.pl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl index 940a37a8a89..39977f5883d 100755 --- a/Master/texmf/scripts/texlive/tlmgr.pl +++ b/Master/texmf/scripts/texlive/tlmgr.pl @@ -1127,7 +1127,7 @@ sub action_update { # . delete all hash entries for dependencies occuring on the local for my $c ($localtlpdb->collections) { my $tlc = $localtlpdb->get_package($c); - die "Should not happen, pkg $c listed but not found!" if !defined($tlc); + die "should not happen, pkg $c listed but not found" if !defined($tlc); my $tlcremote = $mediatlpdb->get_package($c); if (!defined($tlcremote)) { debug("Collection $c is not present on the server!\n"); @@ -1144,7 +1144,7 @@ sub action_update { # in case a package has been moved between collections for my $c ($mediatlpdb->collections) { my $tlc = $mediatlpdb->get_package($c); - die "Should not happen, $c listed but not found" if !defined($tlc); + die "should not happen, $c listed but not found" if !defined($tlc); for my $d ($tlc->depends) { # those package are referenced, so do not remove them delete($removals{$d}); @@ -1180,7 +1180,7 @@ sub action_update { for my $c ($localtlpdb->collections) { my $localtlc = $localtlpdb->get_package($c); if (!defined($localtlc)) { - tlwarn("\nShould not happen, no localtlc for $c!\n"); + tlwarn("\nShould not happen, no localtlc for $c\n"); next; } my @localtlcdeps = $localtlc->depends; @@ -1248,7 +1248,7 @@ sub action_update { # install new packages my $mediatlp = $mediatlpdb->get_package($pkg); if (!defined($mediatlp)) { - tlwarn("\nShould not happen, please report: $pkg not found in $location\n"); + tlwarn("\nShould not happen: $pkg not found in $location\n"); next; } my $mediarev = $mediatlp->revision; |