texlive[47856] Master/tlpkg/TeXLive/TLUtils.pm: fix suicide

[commits+preining at tug.org]

Revision: 47856
          http://tug.org/svn/texlive?view=revision&revision=47856
Author:   preining
Date:     2018-05-28 02:51:15 +0200 (Mon, 28 May 2018)
Log Message:
-----------
fix suicide

Modified Paths:
--------------
    trunk/Master/tlpkg/TeXLive/TLUtils.pm

Modified: trunk/Master/tlpkg/TeXLive/TLUtils.pm
===================================================================
--- trunk/Master/tlpkg/TeXLive/TLUtils.pm	2018-05-28 00:31:12 UTC (rev 47855)
+++ trunk/Master/tlpkg/TeXLive/TLUtils.pm	2018-05-28 00:51:15 UTC (rev 47856)
@@ -4327,7 +4327,7 @@
   my $r = shift;
   my %r;
   die "internal error, repository_to_array passed nothing (caller="
-      . caller . ")";
+      . caller . ")" if (!$r);
   my @repos = split (' ', $r);
   if ($#repos == 0) {
     # only one repo, this is the main one!