texlive[66898] Master/tlpkg/bin/tl-update-auto: guard against

[commits+karl at tug.org]

Revision: 66898
          http://tug.org/svn/texlive?view=revision&revision=66898
Author:   karl
Date:     2023-04-20 00:12:53 +0200 (Thu, 20 Apr 2023)
Log Message:
-----------
guard against tl-update-ctan-mirrors not finding
any valid mirrors, as happened last night.

Modified Paths:
--------------
    trunk/Master/tlpkg/bin/tl-update-auto

Modified: trunk/Master/tlpkg/bin/tl-update-auto
===================================================================
--- trunk/Master/tlpkg/bin/tl-update-auto	2023-04-19 22:04:41 UTC (rev 66897)
+++ trunk/Master/tlpkg/bin/tl-update-auto	2023-04-19 22:12:53 UTC (rev 66898)
@@ -261,9 +261,12 @@
     ls -l $mirrors4tl >&2
     
   elif wget --quiet https://ctan.org/tex-archive/CTAN.sites -O $ctan_mirrors \
-     && rsync rsync://comedy.dante.de/MirMon/mirmon.state $ctan_mirmon; then
-    $mydir/tl-update-ctan-mirrors -v $ctan_mirrors $ctan_mirmon >$mirrors4tl.new
-    if $diff $mirrors4tl $mirrors4tl.new; then
+     && rsync rsync://rsync.dante.ctan.org/MirMon/mirmon.state $ctan_mirmon; then
+    $mydir/tl-update-ctan-mirrors -v $ctan_mirrors $ctan_mirmon \
+      >$mirrors4tl.new
+    if test $? -ne 0 || test ! -s $mirrors4tl.new; then
+      echo "$0: tl-update-ctan-mirrors apparently failed, skipping." >&2
+    elif $diff $mirrors4tl $mirrors4tl.new; then
       $verbose "  $mirrors4tl ok."
       rm -f $mirrors4tl.new
     else