texlive[57052] Master/install-tl: install-tl on MacOS: suppress tcl

[commits+siepo at tug.org]

Revision: 57052
          http://tug.org/svn/texlive?view=revision&revision=57052
Author:   siepo
Date:     2020-12-03 13:02:10 +0100 (Thu, 03 Dec 2020)
Log Message:
-----------
install-tl on MacOS: suppress tcl deprecation warning

Modified Paths:
--------------
    trunk/Master/install-tl

Modified: trunk/Master/install-tl
===================================================================
--- trunk/Master/install-tl	2020-12-03 10:39:54 UTC (rev 57051)
+++ trunk/Master/install-tl	2020-12-03 12:02:10 UTC (rev 57052)
@@ -119,6 +119,8 @@
   }
   # done scanning arguments
   if ($want_tcl) {
+    # Darwin: suppress deprecation warning
+    $ENV{'TK_SILENCE_DEPRECATION'} = 1 if $^O eq 'darwin';
     unshift (@new_args, "--");
     unshift (@new_args, "$::installerdir/tlpkg/installer/install-tl-gui.tcl");
     my @wishes = qw /wish wish8.7 wish8.6 wish8.5 tclkit/;