exit 0 on success

git-svn-id: svn://tug.org/texlive/trunk@11059 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 10 insertions, 8 deletions

diff --git a/Master/tlpkg/bin/tl-update-containers b/Master/tlpkg/bin/tl-update-containers
index 21817052217..2c6d24ddb78 100755
--- a/Master/tlpkg/bin/tl-update-containers
+++ b/Master/tlpkg/bin/tl-update-containers
@@ -76,7 +76,7 @@ sub main
 
   if (! $opt_recreate) {
     if (! -r "$opt_location/tlpkg/texlive.tlpdb") {
-      tlwarn ("$0: Cannot load tlpdb from $opt_location, continuing in recreate mode.\n");
+      tlwarn("$0: Cannot load tlpdb from $opt_location, continuing in recreate mode.\n");
       $opt_recreate = 1;
     }
   }
@@ -179,11 +179,11 @@ sub main
     # do a full setup
     my $ret = &TeXLive::TLUtils::setup_programs("$Master/tlpkg/installer");
     if ($ret == -1) {
-      tlwarn("no binary of lzmadec for $::_platform_ detected, aborting.\n");
+      tlwarn("$0: no binary of lzmadec for $::_platform_ detected, aborting.\n");
       exit 1;
     }
     if (!$ret) {
-      tlwarn("binaries could not be set up, aborting.\n");
+      tlwarn("$0: binaries could not be set up, aborting.\n");
       exit 1;
     }
   }
@@ -196,11 +196,11 @@ sub main
       # .arch packages are skipped, too
       if ($pkg =~ m/^$manualpkgre/) {
         if ($opt_all || $opt_recreate) {
-          tlwarn ("$0: updating critical $pkg due to -all\n");
+          tlwarn("$0: updating critical $pkg due to -all\n");
           last; # of the manualpkgre checks
 
         } else {
-          tlwarn ("$0: skipping critical $pkg\n");
+          tlwarn("$0: skipping critical $pkg\n");
           # we assume that the packages in @critical_pkg_list always
           # exist, so if they are there then the number of updated packages
           # should be reduced.
@@ -296,11 +296,11 @@ sub main
       # .arch packages are skipped, too
       if ($op =~ m/^$manualpkgre/) {
         if ($opt_all || $opt_recreate) {
-          tlwarn ("$0: removing critical $op due to -all\n");
+          tlwarn("$0: removing critical $op due to -all\n");
           last; # of the manualpkgre checks
 
         } else {
-          tlwarn ("$0: skipping removal of critical $op\n");
+          tlwarn("$0: skipping removal of critical $op\n");
           # the following line skips all other regexp checks on critical
           # packages and skips everything below this (the part which
           # actually builds the containers) and continues with the next
@@ -340,9 +340,11 @@ sub main
   foreach my $p ($nettlpdb->list_packages) {
     next if $p =~ /00texlive/;
     if (! -r "$opt_containerdir/$p.tar.lzma") {
-      tlwarn ("container for $p is missing, strange!\n");
+      tlwarn("$0: container for $p is missing, strange\n");
     }
   }
+
+  return 0;
 }