summaryrefslogtreecommitdiff
path: root/Build
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2011-07-25 22:23:08 +0000
committerKarl Berry <karl@freefriends.org>2011-07-25 22:23:08 +0000
commit4e7f01293c3e3870d387411e8e5c1dd9b7cc4523 (patch)
tree9b0a77c5dd6d44a452eb7cc931ee0ae1c98a2077 /Build
parentefe6cc82fe94c03386364305bef7ce96b63dd344 (diff)
sync
git-svn-id: svn://tug.org/texlive/trunk@23225 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build')
-rwxr-xr-xBuild/source/texk/texlive/linked_scripts/texlive/tlmgr.pl14
1 files changed, 7 insertions, 7 deletions
diff --git a/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl b/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl
index bf6681e0d8d..d9d8dedb8a6 100755
--- a/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl
+++ b/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl
@@ -1,12 +1,12 @@
#!/usr/bin/env perl
-# $Id: tlmgr.pl 23117 2011-06-23 18:00:23Z karl $
+# $Id: tlmgr.pl 23193 2011-07-21 06:05:07Z preining $
#
# Copyright 2008, 2009, 2010, 2011 Norbert Preining
# This file is licensed under the GNU General Public License version 2
# or any later version.
-my $svnrev = '$Revision: 23117 $';
-my $datrev = '$Date: 2011-06-23 20:00:23 +0200 (Thu, 23 Jun 2011) $';
+my $svnrev = '$Revision: 23193 $';
+my $datrev = '$Date: 2011-07-21 08:05:07 +0200 (Thu, 21 Jul 2011) $';
my $tlmgrrevision;
if ($svnrev =~ m/: ([0-9]+) /) {
$tlmgrrevision = $1;
@@ -1047,7 +1047,7 @@ sub action_path {
}
} else {
# that should not happen
- tlwarn("\ntlmgr: Should not happen, action_path what=$what");
+ tlwarn("\ntlmgr: Should not happen, action_path what=$what\n");
exit 1;
}
return;
@@ -1182,7 +1182,7 @@ sub action_show {
for my $d (sort @todo) {
my $foo = $tlpdb->get_package($d);
if (!$foo) {
- tlwarn ("\nShould not happen, no dependent package $d");
+ tlwarn ("\nShould not happen, no dependent package $d\n");
next;
}
if ($d ne $pkg) {
@@ -2353,7 +2353,7 @@ sub action_update {
# install new packages
my $mediatlp = $remotetlpdb->get_package($pkg);
if (!defined($mediatlp)) {
- tlwarn("\nShould not happen: $pkg not found in $location");
+ tlwarn("\nShould not happen: $pkg not found in $location\n");
next;
}
my $mediarev = $mediatlp->revision;
@@ -2795,7 +2795,7 @@ sub action_update {
# install new packages
my $mediatlp = $remotetlpdb->get_package($pkg);
if (!defined($mediatlp)) {
- tlwarn("\nShould not happen: $pkg not found in $location");
+ tlwarn("\nShould not happen: $pkg not found in $location\n");
next;
}
my $mediarev = $mediatlp->revision;