texlive[64382] Master/tlpkg/TeXLive/TLPOBJ.pm: (make_container): try

[commits+karl at tug.org]

Revision: 64382
          http://tug.org/svn/texlive?view=revision&revision=64382
Author:   karl
Date:     2022-09-14 17:38:18 +0200 (Wed, 14 Sep 2022)
Log Message:
-----------
(make_container): try to do ls -l as warning if something is
neither a file or a symlink (what is it?).
https://tug.org/pipermail/tex-live/2022-September/048428.html

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

Modified: trunk/Master/tlpkg/TeXLive/TLPOBJ.pm
===================================================================
--- trunk/Master/tlpkg/TeXLive/TLPOBJ.pm	2022-09-14 13:18:47 UTC (rev 64381)
+++ trunk/Master/tlpkg/TeXLive/TLPOBJ.pm	2022-09-14 15:38:18 UTC (rev 64382)
@@ -1,6 +1,6 @@
 # $Id$
 # TeXLive::TLPOBJ.pm - module for using tlpobj files
-# Copyright 2007-2021 Norbert Preining
+# Copyright 2007-2022 Norbert Preining
 # This file is licensed under the GNU General Public License version 2
 # or any later version.
 
@@ -680,6 +680,9 @@
       tlwarn("$0: (make_container $containername) $f does not exist\n");
     } else {
       tlwarn("$0: (make_container $containername) $f not file or symlink\n");
+      if (! win32()) {
+        tlwarn("$0:   ", `ls -l $f 2>&1`);
+      }
     }
   }