texlive[47808] Master/tlpkg/TeXLive/TLUtils.pm: downgrade some debug

commits+preining at tug.org commits+preining at tug.org
Wed May 23 04:33:32 CEST 2018


Revision: 47808
          http://tug.org/svn/texlive?view=revision&revision=47808
Author:   preining
Date:     2018-05-23 04:33:32 +0200 (Wed, 23 May 2018)
Log Message:
-----------
downgrade some debug statements to ddebug

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

Modified: trunk/Master/tlpkg/TeXLive/TLUtils.pm
===================================================================
--- trunk/Master/tlpkg/TeXLive/TLUtils.pm	2018-05-23 02:33:23 UTC (rev 47807)
+++ trunk/Master/tlpkg/TeXLive/TLUtils.pm	2018-05-23 02:33:32 UTC (rev 47808)
@@ -517,7 +517,7 @@
 
 sub initialize_global_tmpdir {
   $::tl_tmpdir = File::Temp::tempdir(CLEANUP => 1);
-  debug("tl_tempdir: creating global tempdir $::tl_tmpdir\n");
+  ddebug("tl_tempdir: creating global tempdir $::tl_tmpdir\n");
   return ($::tl_tmpdir);
 }
 
@@ -531,7 +531,7 @@
 sub tl_tmpdir {
   initialize_global_tmpdir() if (!defined($::tl_tmpdir));
   my $tmp = File::Temp::tempdir(DIR => $::tl_tmpdir, CLEANUP => 1);
-  debug("tl_tempdir: creating tempdir $tmp\n");
+  ddebug("tl_tempdir: creating tempdir $tmp\n");
   return ($tmp);
 }
 
@@ -546,7 +546,7 @@
 sub tl_tmpfile {
   initialize_global_tmpdir() if (!defined($::tl_tmpdir));
   my ($fh, $fn) = File::Temp::tempfile(@_, DIR => $::tl_tmpdir, UNLINK => 1);
-  debug("tl_tempfile: creating tempfile $fn\n");
+  ddebug("tl_tempfile: creating tempfile $fn\n");
   return ($fh, $fn);
 }
 
@@ -2595,11 +2595,11 @@
     }
   } else {
     if (!defined($::tldownload_server)) {
-      debug("::tldownload_server not defined\n");
+      ddebug("::tldownload_server not defined\n");
     } else {
-      debug("::tldownload_server->enabled is not set\n");
+      ddebug("::tldownload_server->enabled is not set\n");
     }
-    debug("persistent connection not set up, using wget\n");
+    debug("persistent connection not set up, using fallback downloader\n");
   }
   
   # try again.



More information about the tex-live-commits mailing list