<pre style='margin:0'>
Joshua Root (jmroot) pushed a commit to branch master
in repository macports-base.

</pre>
<p><a href="https://github.com/macports/macports-base/commit/126d19240f190bdc80f2716f9488c9f12e9b47fc">https://github.com/macports/macports-base/commit/126d19240f190bdc80f2716f9488c9f12e9b47fc</a></p>
<pre style="white-space: pre; background: #F8F8F8">The following commit(s) were added to refs/heads/master by this push:
<span style='display:block; white-space:pre;color:#404040;'>     new 126d19240 worker_init: don't send load scripts for all packages
</span>126d19240 is described below

<span style='display:block; white-space:pre;color:#808000;'>commit 126d19240f190bdc80f2716f9488c9f12e9b47fc
</span>Author: Joshua Root <jmr@macports.org>
AuthorDate: Thu Mar 14 16:32:51 2024 +1100

<span style='display:block; white-space:pre;color:#404040;'>    worker_init: don't send load scripts for all packages
</span><span style='display:block; white-space:pre;color:#404040;'>    
</span><span style='display:block; white-space:pre;color:#404040;'>    There are a lot of packages and most of them will not be used in
</span><span style='display:block; white-space:pre;color:#404040;'>    Portfile interpreters. Packages we don't do this for can still be used,
</span><span style='display:block; white-space:pre;color:#404040;'>    they just load a bit more slowly.
</span>---
 src/macports1.0/macports.tcl | 18 +++++++++++++-----
 1 file changed, 13 insertions(+), 5 deletions(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/src/macports1.0/macports.tcl b/src/macports1.0/macports.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index e4628609d..db702a84b 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/src/macports1.0/macports.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/src/macports1.0/macports.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -1814,11 +1814,19 @@ proc macports::worker_init {workername portpath porturl portbuildpath options va
</span>     # cd: This is necessary for some code in port1.0, but should be hidden
     interp eval $workername [list rename cd _cd]
 
<span style='display:block; white-space:pre;background:#ffe0e0;'>-    # Tell the sub interpreter about all the Tcl packages we already
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    # know about so it won't glob for packages.
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    # TODO: There are a lot of these. Should we restrict it to only
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    # the packages that are likely to be needed?
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    foreach pkgName [package names] {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    # Tell the sub interpreter about commonly needed Tcl packages we
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    # already know about so it won't glob for packages.
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    foreach pkgName {port portactivate portarchivefetch portbuild portbump
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                     portchecksum portclean portconfigure portdeactivate
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                     portdepends portdestroot portdistcheck portdistfiles
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                     portdmg portextract portfetch portimage portinstall
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                     portlint portlivecheck portload portmain portmdmg
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                     portmirror portmpkg portpatch portpkg portprogress
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                     portreload portsandbox portstartupitem porttest
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                     porttrace portunarchive portuninstall portunload
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                     portutil cmdline fetch_common fileutil machista msgcat
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                     Pextlib macports_dlist macports_util mpcommon
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                     mp_package signalcatch Thread} {
</span>         foreach pkgVers [package versions $pkgName] {
             set pkgLoadScript [package ifneeded $pkgName $pkgVers]
             $workername eval [list package ifneeded $pkgName $pkgVers $pkgLoadScript]
</pre><pre style='margin:0'>

</pre>