<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN"
"http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head><meta http-equiv="content-type" content="text/html; charset=utf-8" />
<title>[119170] branches/release_2_3/base</title>
</head>
<body>
<style type="text/css"><!--
#msg dl.meta { border: 1px #006 solid; background: #369; padding: 6px; color: #fff; }
#msg dl.meta dt { float: left; width: 6em; font-weight: bold; }
#msg dt:after { content:':';}
#msg dl, #msg dt, #msg ul, #msg li, #header, #footer, #logmsg { font-family: verdana,arial,helvetica,sans-serif; font-size: 10pt; }
#msg dl a { font-weight: bold}
#msg dl a:link { color:#fc3; }
#msg dl a:active { color:#ff0; }
#msg dl a:visited { color:#cc6; }
h3 { font-family: verdana,arial,helvetica,sans-serif; font-size: 10pt; font-weight: bold; }
#msg pre { overflow: auto; background: #ffc; border: 1px #fa0 solid; padding: 6px; }
#logmsg { background: #ffc; border: 1px #fa0 solid; padding: 1em 1em 0 1em; }
#logmsg p, #logmsg pre, #logmsg blockquote { margin: 0 0 1em 0; }
#logmsg p, #logmsg li, #logmsg dt, #logmsg dd { line-height: 14pt; }
#logmsg h1, #logmsg h2, #logmsg h3, #logmsg h4, #logmsg h5, #logmsg h6 { margin: .5em 0; }
#logmsg h1:first-child, #logmsg h2:first-child, #logmsg h3:first-child, #logmsg h4:first-child, #logmsg h5:first-child, #logmsg h6:first-child { margin-top: 0; }
#logmsg ul, #logmsg ol { padding: 0; list-style-position: inside; margin: 0 0 0 1em; }
#logmsg ul { text-indent: -1em; padding-left: 1em; }#logmsg ol { text-indent: -1.5em; padding-left: 1.5em; }
#logmsg > ul, #logmsg > ol { margin: 0 0 1em 0; }
#logmsg pre { background: #eee; padding: 1em; }
#logmsg blockquote { border: 1px solid #fa0; border-left-width: 10px; padding: 1em 1em 0 1em; background: white;}
#logmsg dl { margin: 0; }
#logmsg dt { font-weight: bold; }
#logmsg dd { margin: 0; padding: 0 0 0.5em 0; }
#logmsg dd:before { content:'\00bb';}
#logmsg table { border-spacing: 0px; border-collapse: collapse; border-top: 4px solid #fa0; border-bottom: 1px solid #fa0; background: #fff; }
#logmsg table th { text-align: left; font-weight: normal; padding: 0.2em 0.5em; border-top: 1px dotted #fa0; }
#logmsg table td { text-align: right; border-top: 1px dotted #fa0; padding: 0.2em 0.5em; }
#logmsg table thead th { text-align: center; border-bottom: 1px solid #fa0; }
#logmsg table th.Corner { text-align: left; }
#logmsg hr { border: none 0; border-top: 2px dashed #fa0; height: 1px; }
#header, #footer { color: #fff; background: #636; border: 1px #300 solid; padding: 6px; }
#patch { width: 100%; }
#patch h4 {font-family: verdana,arial,helvetica,sans-serif;font-size:10pt;padding:8px;background:#369;color:#fff;margin:0;}
#patch .propset h4, #patch .binary h4 {margin:0;}
#patch pre {padding:0;line-height:1.2em;margin:0;}
#patch .diff {width:100%;background:#eee;padding: 0 0 10px 0;overflow:auto;}
#patch .propset .diff, #patch .binary .diff {padding:10px 0;}
#patch span {display:block;padding:0 10px;}
#patch .modfile, #patch .addfile, #patch .delfile, #patch .propset, #patch .binary, #patch .copfile {border:1px solid #ccc;margin:10px 0;}
#patch ins {background:#dfd;text-decoration:none;display:block;padding:0 10px;}
#patch del {background:#fdd;text-decoration:none;display:block;padding:0 10px;}
#patch .lines, .info {color:#888;background:#fff;}
--></style>
<div id="msg">
<dl class="meta">
<dt>Revision</dt> <dd><a href="https://trac.macports.org/changeset/119170">119170</a></dd>
<dt>Author</dt> <dd>cal@macports.org</dd>
<dt>Date</dt> <dd>2014-04-18 14:57:35 -0700 (Fri, 18 Apr 2014)</dd>
</dl>
<h3>Log Message</h3>
<pre>merge <a href="https://trac.macports.org/changeset/118559">r118559</a>, <a href="https://trac.macports.org/changeset/118563">r118563</a>-<a href="https://trac.macports.org/changeset/118569">r118569</a>, <a href="https://trac.macports.org/changeset/119169">r119169</a> from trunk:
Remove macports_fastload.tcl, provide port-tclsh</pre>
<h3>Modified Paths</h3>
<ul>
<li><a href="#branchesrelease_2_3baseMakefilein">branches/release_2_3/base/Makefile.in</a></li>
<li><a href="#branchesrelease_2_3baseMkmacportsautoconfmkin">branches/release_2_3/base/Mk/macports.autoconf.mk.in</a></li>
<li><a href="#branchesrelease_2_3baseconfigure">branches/release_2_3/base/configure</a></li>
<li><a href="#branchesrelease_2_3baseconfigureac">branches/release_2_3/base/configure.ac</a></li>
<li><a href="#branchesrelease_2_3baseportmgrdmgpostflightin">branches/release_2_3/base/portmgr/dmg/postflight.in</a></li>
<li><a href="#branchesrelease_2_3baseportmgrjobsMakefile">branches/release_2_3/base/portmgr/jobs/Makefile</a></li>
<li><a href="#branchesrelease_2_3baseportmgrjobsPortIndex2MySQLtcl">branches/release_2_3/base/portmgr/jobs/PortIndex2MySQL.tcl</a></li>
<li><a href="#branchesrelease_2_3basesrcMakefilein">branches/release_2_3/base/src/Makefile.in</a></li>
<li><a href="#branchesrelease_2_3basesrccflib10Makefilein">branches/release_2_3/base/src/cflib1.0/Makefile.in</a></li>
<li><a href="#branchesrelease_2_3basesrcdarwintracelib10Makefilein">branches/release_2_3/base/src/darwintracelib1.0/Makefile.in</a></li>
<li><a href="#branchesrelease_2_3basesrcmachista10Makefilein">branches/release_2_3/base/src/machista1.0/Makefile.in</a></li>
<li><a href="#branchesrelease_2_3basesrcmacports10Makefilein">branches/release_2_3/base/src/macports1.0/Makefile.in</a></li>
<li><a href="#branchesrelease_2_3basesrcmacports10macportstcl">branches/release_2_3/base/src/macports1.0/macports.tcl</a></li>
<li><a href="#branchesrelease_2_3basesrcmacports10macports_test_autoconftclin">branches/release_2_3/base/src/macports1.0/macports_test_autoconf.tcl.in</a></li>
<li><a href="#branchesrelease_2_3basesrcmacports10testsmacportstest">branches/release_2_3/base/src/macports1.0/tests/macports.test</a></li>
<li><a href="#branchesrelease_2_3basesrcmacports10testsmacports_dlisttest">branches/release_2_3/base/src/macports1.0/tests/macports_dlist.test</a></li>
<li><a href="#branchesrelease_2_3basesrcmacports10testsmacports_utiltest">branches/release_2_3/base/src/macports1.0/tests/macports_util.test</a></li>
<li><a href="#branchesrelease_2_3basesrcpackage10Makefilein">branches/release_2_3/base/src/package1.0/Makefile.in</a></li>
<li><a href="#branchesrelease_2_3basesrcpackage10package_test_autoconftclin">branches/release_2_3/base/src/package1.0/package_test_autoconf.tcl.in</a></li>
<li><a href="#branchesrelease_2_3basesrcpackage10testsportarchivefetchtest">branches/release_2_3/base/src/package1.0/tests/portarchivefetch.test</a></li>
<li><a href="#branchesrelease_2_3basesrcpackage10testsportdmgtest">branches/release_2_3/base/src/package1.0/tests/portdmg.test</a></li>
<li><a href="#branchesrelease_2_3basesrcpackage10testsportdpkgtest">branches/release_2_3/base/src/package1.0/tests/portdpkg.test</a></li>
<li><a href="#branchesrelease_2_3basesrcpackage10testsportmdmgtest">branches/release_2_3/base/src/package1.0/tests/portmdmg.test</a></li>
<li><a href="#branchesrelease_2_3basesrcpackage10testsportmpkgtest">branches/release_2_3/base/src/package1.0/tests/portmpkg.test</a></li>
<li><a href="#branchesrelease_2_3basesrcpackage10testsportpkgtest">branches/release_2_3/base/src/package1.0/tests/portpkg.test</a></li>
<li><a href="#branchesrelease_2_3basesrcpextlib10Makefilein">branches/release_2_3/base/src/pextlib1.0/Makefile.in</a></li>
<li><a href="#branchesrelease_2_3basesrcpkg_mkindexshin">branches/release_2_3/base/src/pkg_mkindex.sh.in</a></li>
<li><a href="#branchesrelease_2_3basesrcportMakefilein">branches/release_2_3/base/src/port/Makefile.in</a></li>
<li><a href="#branchesrelease_2_3basesrcportporttcl">branches/release_2_3/base/src/port/port.tcl</a></li>
<li><a href="#branchesrelease_2_3basesrcportportindextcl">branches/release_2_3/base/src/port/portindex.tcl</a></li>
<li><a href="#branchesrelease_2_3basesrcportportmirrortcl">branches/release_2_3/base/src/port/portmirror.tcl</a></li>
<li><a href="#branchesrelease_2_3basesrcport10Makefilein">branches/release_2_3/base/src/port1.0/Makefile.in</a></li>
<li><a href="#branchesrelease_2_3basesrcport10port_autoconftclin">branches/release_2_3/base/src/port1.0/port_autoconf.tcl.in</a></li>
<li><a href="#branchesrelease_2_3basesrcport10port_test_autoconftclin">branches/release_2_3/base/src/port1.0/port_test_autoconf.tcl.in</a></li>
<li><a href="#branchesrelease_2_3basesrcport10porttracetcl">branches/release_2_3/base/src/port1.0/porttrace.tcl</a></li>
<li><a href="#branchesrelease_2_3basesrcport10testsportactivatetest">branches/release_2_3/base/src/port1.0/tests/portactivate.test</a></li>
<li><a href="#branchesrelease_2_3basesrcport10testsportchecksumtest">branches/release_2_3/base/src/port1.0/tests/portchecksum.test</a></li>
<li><a href="#branchesrelease_2_3basesrcport10testsportcleantest">branches/release_2_3/base/src/port1.0/tests/portclean.test</a></li>
<li><a href="#branchesrelease_2_3basesrcport10testsportdeactivatetest">branches/release_2_3/base/src/port1.0/tests/portdeactivate.test</a></li>
<li><a href="#branchesrelease_2_3basesrcport10testsportdependstest">branches/release_2_3/base/src/port1.0/tests/portdepends.test</a></li>
<li><a href="#branchesrelease_2_3basesrcport10testsportdistchecktest">branches/release_2_3/base/src/port1.0/tests/portdistcheck.test</a></li>
<li><a href="#branchesrelease_2_3basesrcport10testsportinstalltest">branches/release_2_3/base/src/port1.0/tests/portinstall.test</a></li>
<li><a href="#branchesrelease_2_3basesrcport10testsportloadtest">branches/release_2_3/base/src/port1.0/tests/portload.test</a></li>
<li><a href="#branchesrelease_2_3basesrcport10testsportmaintest">branches/release_2_3/base/src/port1.0/tests/portmain.test</a></li>
<li><a href="#branchesrelease_2_3basesrcport10testsportpatchtest">branches/release_2_3/base/src/port1.0/tests/portpatch.test</a></li>
<li><a href="#branchesrelease_2_3basesrcport10testsporttesttest">branches/release_2_3/base/src/port1.0/tests/porttest.test</a></li>
<li><a href="#branchesrelease_2_3basesrcport10testsportuninstalltest">branches/release_2_3/base/src/port1.0/tests/portuninstall.test</a></li>
<li><a href="#branchesrelease_2_3basesrcport10testsportutiltest">branches/release_2_3/base/src/port1.0/tests/portutil.test</a></li>
<li><a href="#branchesrelease_2_3basesrcregistry20Makefilein">branches/release_2_3/base/src/registry2.0/Makefile.in</a></li>
<li><a href="#branchesrelease_2_3basesrctclobjc10Makefilein">branches/release_2_3/base/src/tclobjc1.0/Makefile.in</a></li>
</ul>
<h3>Added Paths</h3>
<ul>
<li><a href="#branchesrelease_2_3basesrcdedup_portfilestclin">branches/release_2_3/base/src/dedup_portfiles.tcl.in</a></li>
<li><a href="#branchesrelease_2_3basesrcimages_to_archivestclin">branches/release_2_3/base/src/images_to_archives.tcl.in</a></li>
<li><a href="#branchesrelease_2_3basesrcupgrade_sources_conf_defaulttclin">branches/release_2_3/base/src/upgrade_sources_conf_default.tcl.in</a></li>
</ul>
<h3>Removed Paths</h3>
<ul>
<li><a href="#branchesrelease_2_3basesrcdedup_portfilestcl">branches/release_2_3/base/src/dedup_portfiles.tcl</a></li>
<li><a href="#branchesrelease_2_3basesrcimages_to_archivestcl">branches/release_2_3/base/src/images_to_archives.tcl</a></li>
<li><a href="#branchesrelease_2_3basesrcmacports10macports_fastloadtclin">branches/release_2_3/base/src/macports1.0/macports_fastload.tcl.in</a></li>
<li><a href="#branchesrelease_2_3basesrcupgrade_sources_conf_defaulttcl">branches/release_2_3/base/src/upgrade_sources_conf_default.tcl</a></li>
</ul>
<h3>Property Changed</h3>
<ul>
<li><a href="#branchesrelease_2_3base">branches/release_2_3/base/</a></li>
<li><a href="#branchesrelease_2_3basesrc">branches/release_2_3/base/src/</a></li>
<li><a href="#branchesrelease_2_3basesrcpextlib10Makefilein">branches/release_2_3/base/src/pextlib1.0/Makefile.in</a></li>
</ul>
</div>
<div id="patch">
<h3>Diff</h3>
<a id="branchesrelease_2_3base"></a>
<div class="propset"><h4>Property changes: branches/release_2_3/base</h4>
<pre class="diff"><span>
</span></pre></div>
<a id="svnmergeinfo"></a>
<div class="modfile"><h4>Modified: svn:mergeinfo</h4></div>
<span class="cx">/branches/gsoc09-logging/base:51231-60371
</span><span class="cx">/branches/gsoc11-rev-upgrade/base:78828-88375
</span><span class="cx">/branches/gsoc11-statistics/base:79520,79666
</span><span class="cx">/branches/gsoc13-tests:106692-111324
</span><span class="cx">/branches/universal-sanity/base:51872-52323
</span><span class="cx">/branches/variant-descs-14482/base:34469-34855,34900-37508,37511-37512,41040-41463,42575-42626,42640-42659
</span><span class="cx">/trunk/base:118038-118039,118056,118161,118598-118599,118602-118603,118606-118607,118640
</span><span class="cx">/users/perry/base-bugs_and_notes:45682-46060
</span><span class="cx">/users/perry/base-select:44044-44692
</span><span class="cx"> + /branches/gsoc08-privileges/base:37343-46937
</span><span class="cx">/branches/gsoc09-logging/base:51231-60371
</span><span class="cx">/branches/gsoc11-rev-upgrade/base:78828-88375
</span><span class="cx">/branches/gsoc11-statistics/base:79520,79666
</span><span class="cx">/branches/gsoc13-tests:106692-111324
</span><span class="cx">/branches/universal-sanity/base:51872-52323
</span><span class="cx">/branches/variant-descs-14482/base:34469-34855,34900-37508,37511-37512,41040-41463,42575-42626,42640-42659
</span><span class="cx">/trunk/base:118038-118039,118056,118161,118559,118562-118569,118598-118599,118602-118603,118606-118607,118640,119169
</span><span class="cx">/users/perry/base-bugs_and_notes:45682-46060
</span><span class="cx">/users/perry/base-select:44044-44692
</span><a id="branchesrelease_2_3baseMakefilein"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/Makefile.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/Makefile.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/Makefile.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -96,8 +96,8 @@
</span><span class="cx"> # Add [default] tag to the central MacPorts repository, if it isn't already
</span><span class="cx"> $(TCLSH) $(srcdir)/src/upgrade_sources_conf_default.tcl "${prefix}"
</span><span class="cx"> # Convert image directories (and direct mode installs) to image archives
</span><del>- $(TCLSH) $(srcdir)/src/images_to_archives.tcl "${macports_tcl_dir}"
- $(TCLSH) $(srcdir)/src/dedup_portfiles.tcl "${macports_tcl_dir}"
</del><ins>+ $(TCLSH) $(srcdir)/src/images_to_archives.tcl
+ $(TCLSH) $(srcdir)/src/dedup_portfiles.tcl
</ins><span class="cx"> endif
</span><span class="cx"> ifndef SELFUPDATING
</span><span class="cx"> @echo ""; echo "Congratulations, you have successfully installed the MacPorts system. To get the Portfiles and update the system, add ${prefix}/bin to your PATH and run:"; echo ""
</span></span></pre></div>
<a id="branchesrelease_2_3baseMkmacportsautoconfmkin"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/Mk/macports.autoconf.mk.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/Mk/macports.autoconf.mk.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/Mk/macports.autoconf.mk.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -49,7 +49,6 @@
</span><span class="cx"> INTREE_TCLSH = @INTREE_TCLSH@
</span><span class="cx"> TCLSH = @TCLSH@
</span><span class="cx"> TCL_PACKAGE_PATH = @TCL_PACKAGE_PATH@
</span><del>-macports_tcl_dir = @macports_tcl_dir@
</del><span class="cx">
</span><span class="cx"> DSCL = @DSCL@
</span><span class="cx"> DSEDITGROUP = @DSEDITGROUP@
</span></span></pre></div>
<a id="branchesrelease_2_3baseconfigure"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/configure (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/configure 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/configure 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -650,7 +650,6 @@
</span><span class="cx"> VENDOR_DESTROOT
</span><span class="cx"> VENDOR_TCL_INSTALL
</span><span class="cx"> VENDOR_TCL_SUBDIR
</span><del>-macports_tcl_dir
</del><span class="cx"> localstatedir_expanded
</span><span class="cx"> MPCONFIGDIR_EXPANDED
</span><span class="cx"> prefix_expanded
</span><span class="lines">@@ -9494,9 +9493,6 @@
</span><span class="cx">
</span><span class="cx"> eval "localstatedir_expanded=$localstatedir"
</span><span class="cx">
</span><del>-eval "macports_tcl_dir=${datadir}/macports/Tcl"
-eval "macports_tcl_dir=$macports_tcl_dir"
-
</del><span class="cx"> # Compute the libexec dir for the vendor packages
</span><span class="cx"> eval "macports_libexec_dir=${libexecdir}/macports"
</span><span class="cx"> eval "macports_libexec_dir=$macports_libexec_dir"
</span></span></pre></div>
<a id="branchesrelease_2_3baseconfigureac"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/configure.ac (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/configure.ac 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/configure.ac 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -311,9 +311,6 @@
</span><span class="cx"> AC_SUBST(MPCONFIGDIR_EXPANDED)
</span><span class="cx"> eval "localstatedir_expanded=$localstatedir"
</span><span class="cx"> AC_SUBST(localstatedir_expanded)
</span><del>-eval "macports_tcl_dir=${datadir}/macports/Tcl"
-eval "macports_tcl_dir=$macports_tcl_dir"
-AC_SUBST(macports_tcl_dir)
</del><span class="cx"> # Compute the libexec dir for the vendor packages
</span><span class="cx"> eval "macports_libexec_dir=${libexecdir}/macports"
</span><span class="cx"> eval "macports_libexec_dir=$macports_libexec_dir"
</span><span class="lines">@@ -413,7 +410,6 @@
</span><span class="cx"> src/machista1.0/Makefile
</span><span class="cx"> src/macports1.0/Makefile
</span><span class="cx"> src/macports1.0/macports_autoconf.tcl
</span><del>- src/macports1.0/macports_fastload.tcl
</del><span class="cx"> src/macports1.0/macports_test_autoconf.tcl
</span><span class="cx"> src/package1.0/Makefile
</span><span class="cx"> src/package1.0/package_test_autoconf.tcl
</span><span class="lines">@@ -430,6 +426,9 @@
</span><span class="cx"> vendor/Makefile
</span><span class="cx"> ])
</span><span class="cx">
</span><ins>+AC_CONFIG_FILES([src/dedup_portfiles.tcl], [chmod +x src/dedup_portfiles.tcl])
+AC_CONFIG_FILES([src/images_to_archives.tcl], [chmod +x src/images_to_archives.tcl])
</ins><span class="cx"> AC_CONFIG_FILES([src/pkg_mkindex.sh], [chmod +x src/pkg_mkindex.sh])
</span><ins>+AC_CONFIG_FILES([src/upgrade_sources_conf_default.tcl], [chmod +x src/upgrade_sources_conf_default.tcl])
</ins><span class="cx">
</span><span class="cx"> AC_OUTPUT
</span></span></pre></div>
<a id="branchesrelease_2_3baseportmgrdmgpostflightin"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/portmgr/dmg/postflight.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/portmgr/dmg/postflight.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/portmgr/dmg/postflight.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -44,16 +44,17 @@
</span><span class="cx"> SBINPATH=${PREFIX}/sbin
</span><span class="cx"> CONFIGPATH=${PREFIX}/etc/macports
</span><span class="cx"> MANPAGES=${PREFIX}/share/man
</span><del>-MACPORTS_TCL_DIR=${PREFIX}/share/macports/Tcl
-REG1DIR=${MACPORTS_TCL_DIR}/registry1.0
</del><span class="cx"> DSCL=/usr/bin/dscl
</span><span class="cx"> RUNUSR=macports
</span><span class="cx"> TCLSH=@TCLSH@
</span><del>-TCL_PACKAGE_DIR=/Library/Tcl
</del><ins>+TCL_PACKAGE_PATH=@TCL_PACKAGE_PATH@
</ins><span class="cx"> TIMESTAMP=$(date +"%Y-%m-%d_at_%H:%M:%S")
</span><span class="cx"> BACKUP_SUFFIX=macports-saved_${TIMESTAMP}
</span><span class="cx"> OUR_STRING="MacPorts Installer addition on ${TIMESTAMP}"
</span><span class="cx">
</span><ins>+OLD_MACPORTS_TCL_DIR=${PREFIX}/share/macports/Tcl
+OLD_TCL_PACKAGE_DIR=/Library/Tcl
+
</ins><span class="cx"> # Create config files from defaults if not present
</span><span class="cx"> function setup_configs {
</span><span class="cx"> for f in archive_sites.conf macports.conf pubkeys.conf sources.conf variants.conf ; do
</span><span class="lines">@@ -73,8 +74,8 @@
</span><span class="cx"> ${TCLSH} ${SCRIPT_DIR}/upgrade_sources_conf_default.tcl ${PREFIX}
</span><span class="cx"> # Convert image directories (and direct mode installs) to image archives
</span><span class="cx"> echo "Updating port image format..."
</span><del>- ${TCLSH} ${SCRIPT_DIR}/images_to_archives.tcl ${MACPORTS_TCL_DIR}
- ${TCLSH} ${SCRIPT_DIR}/dedup_portfiles.tcl ${MACPORTS_TCL_DIR}
</del><ins>+ ${TCLSH} ${SCRIPT_DIR}/images_to_archives.tcl
+ ${TCLSH} ${SCRIPT_DIR}/dedup_portfiles.tcl
</ins><span class="cx">
</span><span class="cx"> echo "Synchronizing the MacPorts installation with the project's rsync server..."
</span><span class="cx"> if ! ${BINPATH}/port -v selfupdate; then
</span><span class="lines">@@ -117,27 +118,24 @@
</span><span class="cx"> echo -e "Done.\n"
</span><span class="cx"> }
</span><span class="cx">
</span><del>-# Delete the old registry1.0 directory
-function delete_reg1 {
- if [[ -d ${REG1DIR} ]]; then
- rm -vrf ${REG1DIR}
</del><ins>+# delete macports1.0 link from old tcl package dir
+function delete_old_tcl_package_link {
+ # delete old link if present
+ if [[ -e "${OLD_TCL_PACKAGE_DIR}/macports1.0" ]]; then
+ rm -vrf "${OLD_TCL_PACKAGE_DIR}/macports1.0"
+ fi
+
+ # delete old macports1.0 link from new tcl package dir if present
+ if [[ -L "${TCL_PACKAGE_PATH}/macports1.0" ]]; then
+ rm -vrf "${TCL_PACKAGE_PATH}/macports1.0"
</ins><span class="cx"> fi
</span><span class="cx"> }
</span><span class="cx">
</span><del>-# link macports1.0 into tcl package dir if possible
-function link_tcl_package {
- # delete old directory if present
- if [[ ! -L "${TCL_PACKAGE_DIR}/macports1.0" ]]; then
- if [[ ! -e "${TCL_PACKAGE_DIR}" ]]; then
- /usr/bin/install -d "${TCL_PACKAGE_DIR}" || true
- fi
- if [[ -d "${TCL_PACKAGE_DIR}/macports1.0" ]]; then
- rm -vrf "${TCL_PACKAGE_DIR}/macports1.0" || true
- fi
- if [[ ! -e "${TCL_PACKAGE_DIR}/macports1.0" && -d "${TCL_PACKAGE_DIR}" ]]; then
- ln -vs "${MACPORTS_TCL_DIR}/macports1.0" "${TCL_PACKAGE_DIR}/macports1.0" || true
- fi
- fi
</del><ins>+# delete the old tcl package location in share/macports/Tcl
+function delete_old_tcl_packages {
+ if [[ -d "${OLD_MACPORTS_TCL_DIR}" ]]; then
+ rm -vrf "${OLD_MACPORTS_TCL_DIR}"
+ fi
</ins><span class="cx"> }
</span><span class="cx">
</span><span class="cx"> # create the user to use for privilege dropping
</span><span class="lines">@@ -190,12 +188,11 @@
</span><span class="cx"> create_run_user
</span><span class="cx"> # Set up config files
</span><span class="cx"> setup_configs
</span><del>-# link macports1.0 pkg
-link_tcl_package
</del><span class="cx">
</span><span class="cx"> # Remove old stuff
</span><span class="cx"> cleanup_man
</span><del>-delete_reg1
</del><ins>+delete_old_tcl_package_link
+delete_old_tcl_packages
</ins><span class="cx">
</span><span class="cx"> # Determine the user's shell, in order to choose an appropriate configuration file we'll be tweaking.
</span><span class="cx"> # Exit nicely if the shell is any other than bash or tcsh, as that's considered non-standard.
</span></span></pre></div>
<a id="branchesrelease_2_3baseportmgrjobsMakefile"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/portmgr/jobs/Makefile (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/portmgr/jobs/Makefile 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/portmgr/jobs/Makefile 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -3,7 +3,7 @@
</span><span class="cx"> SCRIPTS= PortIndex2MySQL
</span><span class="cx">
</span><span class="cx"> edit = sed \
</span><del>- -e 's,@macports_tcl_dir@,$(macports_tcl_dir),g'
</del><ins>+ -e 's,@TCLSH@,$(TCLSH),g'
</ins><span class="cx">
</span><span class="cx">
</span><span class="cx"> include ../../Mk/macports.autoconf.mk
</span></span></pre></div>
<a id="branchesrelease_2_3baseportmgrjobsPortIndex2MySQLtcl"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/portmgr/jobs/PortIndex2MySQL.tcl (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/portmgr/jobs/PortIndex2MySQL.tcl 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/portmgr/jobs/PortIndex2MySQL.tcl 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -1,4 +1,4 @@
</span><del>-#!/opt/local/bin/tclsh
</del><ins>+#!@TCLSH@
</ins><span class="cx"> # -*- coding: utf-8; mode: tcl; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- vim:fenc=utf-8:filetype=tcl:et:sw=4:ts=4:sts=4
</span><span class="cx"> #
</span><span class="cx"> # PortIndex2MySQL.tcl
</span><span class="lines">@@ -178,12 +178,6 @@
</span><span class="cx"> }
</span><span class="cx">
</span><span class="cx"> # Load macports1.0 so that we can use some of its procs and the portinfo array.
</span><del>-if {[catch { source [file join "@macports_tcl_dir@" macports1.0 macports_fastload.tcl] } errstr]} {
- puts $runlog_fd "${::errorInfo}"
- puts $runlog_fd "Failed to locate the macports1.0 Tcl package file: $errstr"
- cleanup lockfile
- terminate 1
-}
</del><span class="cx"> if {[catch { package require macports } errstr]} {
</span><span class="cx"> puts $runlog_fd "${::errorInfo}"
</span><span class="cx"> puts $runlog_fd "Failed to load the macports1.0 Tcl package: $errstr"
</span></span></pre></div>
<a id="branchesrelease_2_3basesrc"></a>
<div class="propset"><h4>Property changes: branches/release_2_3/base/src</h4>
<pre class="diff"><span>
</span></pre></div>
<a id="svnignore"></a>
<div class="modfile"><h4>Modified: svn:ignore</h4></div>
<span class="cx">Makefile
</span><span class="cx">pkg_mkindex.sh
</span><span class="cx"> + config.h
</span><span class="cx">Makefile
</span><span class="cx">pkg_mkindex.sh
</span><span class="cx">dedup_portfiles.tcl
</span><span class="cx">images_to_archives.tcl
</span><span class="cx">upgrade_sources_conf_default.tcl
</span><a id="branchesrelease_2_3basesrcMakefilein"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/Makefile.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/Makefile.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/Makefile.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -20,6 +20,7 @@
</span><span class="cx"> rm -f config.h
</span><span class="cx"> rm -f Makefile
</span><span class="cx"> rm -f pkg_mkindex.sh
</span><ins>+ rm -f dedup_portfiles.tcl images_to_archives.tcl
</ins><span class="cx">
</span><span class="cx"> test::
</span><span class="cx">
</span></span></pre></div>
<a id="branchesrelease_2_3basesrccflib10Makefilein"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/cflib1.0/Makefile.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/cflib1.0/Makefile.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/cflib1.0/Makefile.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -1,10 +1,11 @@
</span><span class="cx"> srcdir = @srcdir@
</span><span class="cx"> VPATH = @srcdir@
</span><span class="cx">
</span><ins>+include ../../Mk/macports.autoconf.mk
+
</ins><span class="cx"> OBJS= CFLib.o
</span><span class="cx"> SHLIB_NAME= CFLib${SHLIB_SUFFIX}
</span><span class="cx"> LIBS+= -framework CoreFoundation
</span><del>-INSTALLDIR= ${DESTDIR}${datadir}/macports/Tcl/cflib1.0
</del><ins>+INSTALLDIR= ${DESTDIR}${TCL_PACKAGE_PATH}/cflib1.0
</ins><span class="cx">
</span><del>-include ../../Mk/macports.autoconf.mk
</del><span class="cx"> include $(srcdir)/../../Mk/macports.tea.mk
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcdarwintracelib10Makefilein"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/darwintracelib1.0/Makefile.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/darwintracelib1.0/Makefile.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/darwintracelib1.0/Makefile.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -1,15 +1,15 @@
</span><span class="cx"> srcdir = @srcdir@
</span><span class="cx"> VPATH = @srcdir@
</span><span class="cx">
</span><ins>+include ../../Mk/macports.autoconf.mk
+
</ins><span class="cx"> # This Makefile will only be run on Darwin systems; we can safely use
</span><span class="cx"> # Apple-specifics here
</span><span class="cx"> SRCS= $(wildcard *.c)
</span><span class="cx"> OBJS= $(SRCS:%.c=%.o)
</span><span class="cx"> SHLIB_NAME= darwintrace${SHLIB_SUFFIX}
</span><del>-INSTALLDIR= ${DESTDIR}${datadir}/macports/Tcl/darwintrace1.0
</del><ins>+INSTALLDIR= ${DESTDIR}${TCL_PACKAGE_PATH}/darwintrace1.0
</ins><span class="cx">
</span><del>-include ../../Mk/macports.autoconf.mk
-
</del><span class="cx"> # Yes, we know having $ signs in identifiers is not a very good idea; in the
</span><span class="cx"> # case of darwintrace we still need them, though.
</span><span class="cx"> CFLAGS_PEDANTIC=
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcdedup_portfilestcl"></a>
<div class="delfile"><h4>Deleted: branches/release_2_3/base/src/dedup_portfiles.tcl (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/dedup_portfiles.tcl 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/dedup_portfiles.tcl 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -1,47 +0,0 @@
</span><del>-#!/usr/bin/env tclsh
-# -*- coding: utf-8; mode: tcl; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- vim:fenc=utf-8:ft=tcl:et:sw=4:ts=4:sts=4
-# $Id$
-
-# move portfiles from sqlite db to filesystem, while deduplicating
-# Takes one argument, which should be TCL_PACKAGE_DIR.
-
-source [file join [lindex $argv 0] macports1.0 macports_fastload.tcl]
-package require macports 1.0
-package require registry2 2.0
-package require Pextlib 1.0
-
-umask 022
-
-array set ui_options {ports_verbose yes}
-
-mportinit ui_options
-
-if {[registry::metadata get portfiles_update_needed] == 1} {
- set portfiles_dir [file join ${macports::registry.path} registry portfiles]
-
- registry::write {
- set installed_ports [registry::entry imaged]
- foreach portref $installed_ports {
- set portfile_contents [$portref portfile]
- if {$portfile_contents ne "" && $portfile_contents ne "0"} {
- set portfile_partial_dir [file join $portfiles_dir [$portref name]-[$portref version]_[$portref revision]]
- file mkdir $portfile_partial_dir
- set portfile_temp_path ${portfile_partial_dir}/Portfile
- set fd [open $portfile_temp_path w]
- puts $fd $portfile_contents
- close $fd
-
- set hash_size [sha256 file $portfile_temp_path]-[file size $portfile_temp_path]
- set portfile_dir [file join $portfile_partial_dir $hash_size]
- file mkdir $portfile_dir
- file rename -force $portfile_temp_path $portfile_dir
- file mtime ${portfile_dir}/Portfile [$portref date]
-
- $portref portfile $hash_size
- }
- }
- registry::metadata del portfiles_update_needed
- }
-}
-
-exit 0
</del></span></pre></div>
<a id="branchesrelease_2_3basesrcdedup_portfilestclinfromrev118559trunkbasesrcdedup_portfilestclin"></a>
<div class="copfile"><h4>Copied: branches/release_2_3/base/src/dedup_portfiles.tcl.in (from rev 118559, trunk/base/src/dedup_portfiles.tcl.in) (0 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/dedup_portfiles.tcl.in (rev 0)
+++ branches/release_2_3/base/src/dedup_portfiles.tcl.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -0,0 +1,46 @@
</span><ins>+#!@TCLSH@
+# -*- coding: utf-8; mode: tcl; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- vim:fenc=utf-8:ft=tcl:et:sw=4:ts=4:sts=4
+# $Id$
+
+# move portfiles from sqlite db to filesystem, while deduplicating
+# Takes one argument, which should be TCL_PACKAGE_DIR.
+
+package require macports 1.0
+package require registry2 2.0
+package require Pextlib 1.0
+
+umask 022
+
+array set ui_options {ports_verbose yes}
+
+mportinit ui_options
+
+if {[registry::metadata get portfiles_update_needed] == 1} {
+ set portfiles_dir [file join ${macports::registry.path} registry portfiles]
+
+ registry::write {
+ set installed_ports [registry::entry imaged]
+ foreach portref $installed_ports {
+ set portfile_contents [$portref portfile]
+ if {$portfile_contents ne "" && $portfile_contents ne "0"} {
+ set portfile_partial_dir [file join $portfiles_dir [$portref name]-[$portref version]_[$portref revision]]
+ file mkdir $portfile_partial_dir
+ set portfile_temp_path ${portfile_partial_dir}/Portfile
+ set fd [open $portfile_temp_path w]
+ puts $fd $portfile_contents
+ close $fd
+
+ set hash_size [sha256 file $portfile_temp_path]-[file size $portfile_temp_path]
+ set portfile_dir [file join $portfile_partial_dir $hash_size]
+ file mkdir $portfile_dir
+ file rename -force $portfile_temp_path $portfile_dir
+ file mtime ${portfile_dir}/Portfile [$portref date]
+
+ $portref portfile $hash_size
+ }
+ }
+ registry::metadata del portfiles_update_needed
+ }
+}
+
+exit 0
</ins></span></pre></div>
<a id="branchesrelease_2_3basesrcimages_to_archivestcl"></a>
<div class="delfile"><h4>Deleted: branches/release_2_3/base/src/images_to_archives.tcl (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/images_to_archives.tcl 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/images_to_archives.tcl 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -1,160 +0,0 @@
</span><del>-#!/usr/bin/env tclsh
-# -*- coding: utf-8; mode: tcl; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- vim:fenc=utf-8:filetype=tcl:et:sw=4:ts=4:sts=4
-# $Id$
-
-# convert existing port image directories into compressed archive versions
-# Takes one argument, which should be TCL_PACKAGE_DIR.
-
-source [file join [lindex $argv 0] macports1.0 macports_fastload.tcl]
-package require macports 1.0
-package require registry 1.0
-package require registry2 2.0
-package require Pextlib 1.0
-
-umask 022
-
-array set ui_options {ports_verbose yes}
-
-mportinit ui_options
-
-# always converting to tbz2 should be fine as both these programs are
-# needed elsewhere and assumed to be available
-set tarcmd [macports::findBinary tar ${macports::autoconf::tar_path}]
-set bzip2cmd [macports::findBinary bzip2 ${macports::autoconf::bzip2_path}]
-
-if {[catch {set ilist [registry::installed]}]} {
- # no ports installed
- puts "No ports installed to convert."
- exit 0
-}
-
-puts "This could take a while..."
-
-# list of ports we successfully create an archive of, to be used to update
-# the registry only after we know all creation attempts were successful.
-set archived_list {}
-set installed_len [llength $ilist]
-set counter 0
-
-foreach installed $ilist {
- incr counter
- set iname [lindex $installed 0]
- set iversion [lindex $installed 1]
- set irevision [lindex $installed 2]
- set ivariants [lindex $installed 3]
- set iepoch [lindex $installed 5]
- set iref [registry::open_entry $iname $iversion $irevision $ivariants $iepoch]
- set installtype [registry::property_retrieve $iref installtype]
- if {$installtype eq "image"} {
- set location [registry::property_retrieve $iref location]
- if {$location == 0} {
- set location [registry::property_retrieve $iref imagedir]
- }
- } else {
- set location ""
- }
-
- if {$location eq "" || ![file isfile $location]} {
- # no image archive present, so make one
- set archs [registry::property_retrieve $iref archs]
- if {$archs eq "" || $archs == 0} {
- set archs ${macports::os_arch}
- }
- # look for any existing archive in the old location
- set oldarchiverootname "${iname}-${iversion}_${irevision}${ivariants}.[join $archs -]"
- set archivetype tbz2
- set oldarchivedir [file join ${macports::portdbpath} packages ${macports::os_platform}_${macports::os_major}]
- set olderarchivedir [file join ${macports::portdbpath} packages ${macports::os_platform}]
- if {[llength $archs] == 1} {
- set oldarchivedir [file join $oldarchivedir $archs $iname]
- set olderarchivedir [file join $olderarchivedir $archs]
- } else {
- set oldarchivedir [file join $oldarchivedir universal $iname]
- set olderarchivedir [file join $olderarchivedir universal]
- }
- set found 0
- foreach adir [list $oldarchivedir $olderarchivedir] {
- foreach type {tbz2 tbz tgz tar txz tlz xar zip cpgz cpio} {
- set oldarchivefullpath "[file join $adir $oldarchiverootname].${type}"
- if {[file isfile $oldarchivefullpath]} {
- set found 1
- set archivetype $type
- break
- }
- }
- if {$found} {break}
- }
-
- # compute new name and location of archive
- set archivename "${iname}-${iversion}_${irevision}${ivariants}.${macports::os_platform}_${macports::os_major}.[join $archs -].${archivetype}"
- ui_msg "Processing ${counter} of ${installed_len}: ${archivename}"
- if {$installtype eq "image"} {
- set targetdir [file dirname $location]
- } else {
- set targetdir [file join ${macports::registry.path} software ${iname}]
- }
- if {$location eq "" || ![file isdirectory $location]} {
- set contents [$iref imagefiles]
- }
- file mkdir $targetdir
- set newlocation [file join $targetdir $archivename]
-
- if {$found} {
- file rename $oldarchivefullpath $newlocation
- } elseif {$installtype eq "image" && [file isdirectory $location]} {
- # create archive from image dir
- system -W $location "$tarcmd -cjf $newlocation * > ${targetdir}/error.log 2>&1"
- file delete -force ${targetdir}/error.log
- } else {
- # direct mode (or missing image dir), create archive from installed files
- # we tell tar to read filenames from a file so as not to run afoul of command line length limits
- set fd [open ${targetdir}/tarlist w]
- foreach entry $contents {
- puts $fd $entry
- }
- close $fd
- system "$tarcmd -cjf $newlocation -T ${targetdir}/tarlist > ${targetdir}/error.log 2>&1"
- file delete -force ${targetdir}/tarlist ${targetdir}/error.log
- }
-
- lappend archived_list [list $installtype $iref $location $newlocation]
- }
-}
-
-set archived_len [llength $archived_list]
-set counter 0
-
-registry::write {
- foreach archived $archived_list {
- incr counter
- ui_msg "Updating registry: ${counter} of ${archived_len}"
- set installtype [lindex $archived 0]
- set iref [lindex $archived 1]
- set newlocation [lindex $archived 3]
-
- if {$installtype eq "direct"} {
- # change receipt to image
- $iref installtype image
- $iref state imaged
- $iref activate [$iref imagefiles]
- $iref state installed
- }
-
- # set the new location in the registry and delete the old dir
- $iref location $newlocation
- }
-}
-
-set counter 0
-foreach archived $archived_list {
- incr counter
- set location [lindex $archived 2]
- ui_msg "Deleting ${counter} of ${archived_len}: ${location}"
- if {$location ne "" && [file isdirectory $location]} {
- if {[catch {file delete -force $location} result]} {
- ui_warn "Failed to delete ${location}: $result"
- }
- }
-}
-
-exit 0
</del></span></pre></div>
<a id="branchesrelease_2_3basesrcimages_to_archivestclinfromrev118559trunkbasesrcimages_to_archivestclin"></a>
<div class="copfile"><h4>Copied: branches/release_2_3/base/src/images_to_archives.tcl.in (from rev 118559, trunk/base/src/images_to_archives.tcl.in) (0 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/images_to_archives.tcl.in (rev 0)
+++ branches/release_2_3/base/src/images_to_archives.tcl.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -0,0 +1,159 @@
</span><ins>+#!@TCLSH@
+# -*- coding: utf-8; mode: tcl; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- vim:fenc=utf-8:filetype=tcl:et:sw=4:ts=4:sts=4
+# $Id$
+
+# convert existing port image directories into compressed archive versions
+# Takes one argument, which should be TCL_PACKAGE_DIR.
+
+package require macports 1.0
+package require registry 1.0
+package require registry2 2.0
+package require Pextlib 1.0
+
+umask 022
+
+array set ui_options {ports_verbose yes}
+
+mportinit ui_options
+
+# always converting to tbz2 should be fine as both these programs are
+# needed elsewhere and assumed to be available
+set tarcmd [macports::findBinary tar ${macports::autoconf::tar_path}]
+set bzip2cmd [macports::findBinary bzip2 ${macports::autoconf::bzip2_path}]
+
+if {[catch {set ilist [registry::installed]}]} {
+ # no ports installed
+ puts "No ports installed to convert."
+ exit 0
+}
+
+puts "This could take a while..."
+
+# list of ports we successfully create an archive of, to be used to update
+# the registry only after we know all creation attempts were successful.
+set archived_list {}
+set installed_len [llength $ilist]
+set counter 0
+
+foreach installed $ilist {
+ incr counter
+ set iname [lindex $installed 0]
+ set iversion [lindex $installed 1]
+ set irevision [lindex $installed 2]
+ set ivariants [lindex $installed 3]
+ set iepoch [lindex $installed 5]
+ set iref [registry::open_entry $iname $iversion $irevision $ivariants $iepoch]
+ set installtype [registry::property_retrieve $iref installtype]
+ if {$installtype eq "image"} {
+ set location [registry::property_retrieve $iref location]
+ if {$location == 0} {
+ set location [registry::property_retrieve $iref imagedir]
+ }
+ } else {
+ set location ""
+ }
+
+ if {$location eq "" || ![file isfile $location]} {
+ # no image archive present, so make one
+ set archs [registry::property_retrieve $iref archs]
+ if {$archs eq "" || $archs == 0} {
+ set archs ${macports::os_arch}
+ }
+ # look for any existing archive in the old location
+ set oldarchiverootname "${iname}-${iversion}_${irevision}${ivariants}.[join $archs -]"
+ set archivetype tbz2
+ set oldarchivedir [file join ${macports::portdbpath} packages ${macports::os_platform}_${macports::os_major}]
+ set olderarchivedir [file join ${macports::portdbpath} packages ${macports::os_platform}]
+ if {[llength $archs] == 1} {
+ set oldarchivedir [file join $oldarchivedir $archs $iname]
+ set olderarchivedir [file join $olderarchivedir $archs]
+ } else {
+ set oldarchivedir [file join $oldarchivedir universal $iname]
+ set olderarchivedir [file join $olderarchivedir universal]
+ }
+ set found 0
+ foreach adir [list $oldarchivedir $olderarchivedir] {
+ foreach type {tbz2 tbz tgz tar txz tlz xar zip cpgz cpio} {
+ set oldarchivefullpath "[file join $adir $oldarchiverootname].${type}"
+ if {[file isfile $oldarchivefullpath]} {
+ set found 1
+ set archivetype $type
+ break
+ }
+ }
+ if {$found} {break}
+ }
+
+ # compute new name and location of archive
+ set archivename "${iname}-${iversion}_${irevision}${ivariants}.${macports::os_platform}_${macports::os_major}.[join $archs -].${archivetype}"
+ ui_msg "Processing ${counter} of ${installed_len}: ${archivename}"
+ if {$installtype eq "image"} {
+ set targetdir [file dirname $location]
+ } else {
+ set targetdir [file join ${macports::registry.path} software ${iname}]
+ }
+ if {$location eq "" || ![file isdirectory $location]} {
+ set contents [$iref imagefiles]
+ }
+ file mkdir $targetdir
+ set newlocation [file join $targetdir $archivename]
+
+ if {$found} {
+ file rename $oldarchivefullpath $newlocation
+ } elseif {$installtype eq "image" && [file isdirectory $location]} {
+ # create archive from image dir
+ system -W $location "$tarcmd -cjf $newlocation * > ${targetdir}/error.log 2>&1"
+ file delete -force ${targetdir}/error.log
+ } else {
+ # direct mode (or missing image dir), create archive from installed files
+ # we tell tar to read filenames from a file so as not to run afoul of command line length limits
+ set fd [open ${targetdir}/tarlist w]
+ foreach entry $contents {
+ puts $fd $entry
+ }
+ close $fd
+ system "$tarcmd -cjf $newlocation -T ${targetdir}/tarlist > ${targetdir}/error.log 2>&1"
+ file delete -force ${targetdir}/tarlist ${targetdir}/error.log
+ }
+
+ lappend archived_list [list $installtype $iref $location $newlocation]
+ }
+}
+
+set archived_len [llength $archived_list]
+set counter 0
+
+registry::write {
+ foreach archived $archived_list {
+ incr counter
+ ui_msg "Updating registry: ${counter} of ${archived_len}"
+ set installtype [lindex $archived 0]
+ set iref [lindex $archived 1]
+ set newlocation [lindex $archived 3]
+
+ if {$installtype eq "direct"} {
+ # change receipt to image
+ $iref installtype image
+ $iref state imaged
+ $iref activate [$iref imagefiles]
+ $iref state installed
+ }
+
+ # set the new location in the registry and delete the old dir
+ $iref location $newlocation
+ }
+}
+
+set counter 0
+foreach archived $archived_list {
+ incr counter
+ set location [lindex $archived 2]
+ ui_msg "Deleting ${counter} of ${archived_len}: ${location}"
+ if {$location ne "" && [file isdirectory $location]} {
+ if {[catch {file delete -force $location} result]} {
+ ui_warn "Failed to delete ${location}: $result"
+ }
+ }
+}
+
+exit 0
</ins></span></pre></div>
<a id="branchesrelease_2_3basesrcmachista10Makefilein"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/machista1.0/Makefile.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/machista1.0/Makefile.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/machista1.0/Makefile.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -1,9 +1,11 @@
</span><span class="cx"> srcdir = @srcdir@
</span><span class="cx"> VPATH = @srcdir@
</span><span class="cx">
</span><ins>+include ../../Mk/macports.autoconf.mk
+
</ins><span class="cx"> OBJS= libmachista.o hashmap.o machista_wrap.o
</span><span class="cx"> SHLIB_NAME= machista${SHLIB_SUFFIX}
</span><del>-INSTALLDIR= ${DESTDIR}${datadir}/macports/Tcl/machista1.0
</del><ins>+INSTALLDIR= ${DESTDIR}${TCL_PACKAGE_PATH}/machista1.0
</ins><span class="cx">
</span><span class="cx"> SWIG = @SWIG@
</span><span class="cx"> SWIG_FLAGS = -tcl8 -pkgversion 1.0 -namespace
</span><span class="lines">@@ -15,7 +17,6 @@
</span><span class="cx">
</span><span class="cx"> TESTS = ./tests/libmachista-test
</span><span class="cx">
</span><del>-include ../../Mk/macports.autoconf.mk
</del><span class="cx"> include $(srcdir)/../../Mk/macports.tea.mk
</span><span class="cx">
</span><span class="cx"> CFLAGS+= -fPIC
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcmacports10Makefilein"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/macports1.0/Makefile.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/macports1.0/Makefile.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/macports1.0/Makefile.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -1,17 +1,16 @@
</span><span class="cx"> srcdir = @srcdir@
</span><span class="cx"> VPATH = @srcdir@
</span><span class="cx">
</span><ins>+include ../../Mk/macports.autoconf.mk
+
</ins><span class="cx"> SRCS= macports.tcl macports_dlist.tcl macports_util.tcl \
</span><del>- macports_autoconf.tcl macports_fastload.tcl
</del><ins>+ macports_autoconf.tcl
</ins><span class="cx"> OBJS= macports.o get_systemconfiguration_proxies.o sysctl.o
</span><span class="cx"> SHLIB_NAME= MacPorts${SHLIB_SUFFIX}
</span><span class="cx">
</span><del>-INSTALLDIR= ${DESTDIR}${datadir}/macports/Tcl/macports1.0
-INSTALLPKGLINK= ${TCL_PACKAGE_PATH}/macports1.0
</del><ins>+INSTALLDIR= ${DESTDIR}${TCL_PACKAGE_PATH}/macports1.0
+OLDINSTALLDIR= ${datadir}/macports/Tcl
</ins><span class="cx">
</span><del>-include ../../Mk/macports.autoconf.mk
-include $(srcdir)/../../Mk/macports.tea.mk
-
</del><span class="cx"> ifeq ($(OBJC_RUNTIME), APPLE_RUNTIME)
</span><span class="cx"> LIBS+= -framework CoreFoundation -framework SystemConfiguration
</span><span class="cx"> endif
</span><span class="lines">@@ -22,9 +21,16 @@
</span><span class="cx"> $(TCLSH) $(srcdir)/tests/test.tcl -nocolor
</span><span class="cx">
</span><span class="cx"> distclean:: clean
</span><del>- rm -f macports_autoconf.tcl macports_fastload.tcl macports_test_autoconf.tcl ${SHLIB_NAME}
</del><ins>+ rm -f macports_autoconf.tcl macports_test_autoconf.tcl ${SHLIB_NAME}
</ins><span class="cx">
</span><span class="cx"> install:: all
</span><ins>+ @# Clean up old instances of the MacPorts Tcl packages
+ if test -z "${DESTDIR}"; then rm -rf "${OLDINSTALLDIR}"; fi
+
+ @# Remove the previously installed link if it still exists. Without this,
+ @# creating the directory will fail.
+ if test -L "${INSTALLDIR}"; then rm -rf "${INSTALLDIR}"; fi
+
</ins><span class="cx"> $(INSTALL) -d -o ${DSTUSR} -g ${DSTGRP} -m ${DSTMODE} ${INSTALLDIR}
</span><span class="cx">
</span><span class="cx"> $(SILENT) set -x; for file in ${SRCS}; do \
</span><span class="lines">@@ -33,17 +39,5 @@
</span><span class="cx">
</span><span class="cx"> $(INSTALL) -o ${DSTUSR} -g ${DSTGRP} -m 444 pkgIndex.tcl ${INSTALLDIR}
</span><span class="cx">
</span><del>- echo "${TCL_PACKAGE_PATH}" > ${DESTDIR}${prefix}/var/macports/.tclpackage
- if test -z "${DESTDIR}" -a "${INSTALLPKGLINK}" != "${INSTALLDIR}"; then \
- if test ! -L "${INSTALLPKGLINK}"; then \
- if test ! -e "${TCL_PACKAGE_PATH}"; then \
- $(INSTALL) -d -o ${DSTUSR} -g ${DSTGRP} -m ${DSTMODE} "${TCL_PACKAGE_PATH}" || true; \
- fi; \
- if test -d "${INSTALLPKGLINK}"; then \
- rm -vrf "${INSTALLPKGLINK}" || true; \
- fi; \
- if test ! -e "${INSTALLPKGLINK}"; then \
- ln -vs "${INSTALLDIR}" "${INSTALLPKGLINK}" || true; \
- fi; \
- fi; \
- fi
</del><ins>+
+include $(srcdir)/../../Mk/macports.tea.mk
</ins></span></pre></div>
<a id="branchesrelease_2_3basesrcmacports10macportstcl"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/macports1.0/macports.tcl (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/macports1.0/macports.tcl 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/macports1.0/macports.tcl 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -40,7 +40,7 @@
</span><span class="cx"> namespace eval macports {
</span><span class="cx"> namespace export bootstrap_options user_options portinterp_options open_mports ui_priorities port_phases
</span><span class="cx"> variable bootstrap_options "\
</span><del>- portdbpath libpath binpath auto_path extra_env sources_conf prefix portdbformat \
</del><ins>+ portdbpath binpath auto_path extra_env sources_conf prefix portdbformat \
</ins><span class="cx"> portarchivetype portautoclean \
</span><span class="cx"> porttrace portverbose keeplogs destroot_umask variants_conf rsync_server rsync_options \
</span><span class="cx"> rsync_dir startupitem_type startupitem_install place_worksymlink xcodeversion xcodebuildcmd \
</span><span class="lines">@@ -541,6 +541,10 @@
</span><span class="cx"> macports::ui_init $priority
</span><span class="cx"> }
</span><span class="cx">
</span><ins>+ package require Pextlib 1.0
+ package require registry 1.0
+ package require registry2 2.0
+ package require machista 1.0
</ins><span class="cx">
</span><span class="cx"> global auto_path env tcl_platform \
</span><span class="cx"> macports::autoconf::macports_conf_path \
</span><span class="lines">@@ -554,7 +558,6 @@
</span><span class="cx"> macports::sources \
</span><span class="cx"> macports::sources_default \
</span><span class="cx"> macports::destroot_umask \
</span><del>- macports::libpath \
</del><span class="cx"> macports::prefix \
</span><span class="cx"> macports::macportsuser \
</span><span class="cx"> macports::prefix_frozen \
</span><span class="lines">@@ -871,10 +874,6 @@
</span><span class="cx"> return -code error "Data files directory '$portsharepath' must exist"
</span><span class="cx"> }
</span><span class="cx">
</span><del>- if {![info exists libpath]} {
- set libpath ${prefix}/share/macports/Tcl
- }
-
</del><span class="cx"> if {![info exists binpath]} {
</span><span class="cx"> set env(PATH) ${prefix}/bin:${prefix}/sbin:/bin:/sbin:/usr/bin:/usr/sbin
</span><span class="cx"> } else {
</span><span class="lines">@@ -1017,21 +1016,6 @@
</span><span class="cx"> set keepenvkeys [concat $keepenvkeys $extra_env]
</span><span class="cx"> }
</span><span class="cx">
</span><del>- if {[file isdirectory $libpath]} {
- lappend auto_path $libpath
- set macports::auto_path $auto_path
-
- # XXX: not sure if this the best place, but it needs to happen
- # early, and after auto_path has been set. Or maybe Pextlib
- # should ship with macports1.0 API?
- package require Pextlib 1.0
- package require registry 1.0
- package require registry2 2.0
- package require machista 1.0
- } else {
- return -code error "Library directory '$libpath' must exist"
- }
-
</del><span class="cx"> # set the hidden flag on $portdbpath to avoid spotlight indexing, which
</span><span class="cx"> # might slow builds down considerably. You can avoid this by touching
</span><span class="cx"> # $portdbpath/.nohide.
</span><span class="lines">@@ -3375,10 +3359,10 @@
</span><span class="cx">
</span><span class="cx"> # selfupdate procedure
</span><span class="cx"> proc macports::selfupdate {{optionslist {}} {updatestatusvar {}}} {
</span><del>- global macports::prefix macports::portdbpath macports::libpath \
- macports::rsync_server macports::rsync_dir macports::rsync_options \
- macports::autoconf::macports_version macports::autoconf::rsync_path \
- tcl_platform macports::autoconf::openssl_path macports::autoconf::tar_path
</del><ins>+ global macports::prefix macports::portdbpath macports::rsync_server macports::rsync_dir \
+ macports::rsync_options macports::autoconf::macports_version \
+ macports::autoconf::rsync_path tcl_platform macports::autoconf::openssl_path \
+ macports::autoconf::tar_path
</ins><span class="cx"> array set options $optionslist
</span><span class="cx">
</span><span class="cx"> # variable that indicates whether we actually updated base
</span><span class="lines">@@ -3503,17 +3487,7 @@
</span><span class="cx"> }
</span><span class="cx"> ui_debug "Permissions OK"
</span><span class="cx">
</span><del>- # where to install a link to our macports1.0 tcl package
- set mp_tclpackage_path [file join $portdbpath .tclpackage]
- if {[file exists $mp_tclpackage_path]} {
- set fd [open $mp_tclpackage_path r]
- gets $fd tclpackage
- close $fd
- } else {
- set tclpackage $libpath
- }
-
- set configure_args "--prefix=$prefix --with-tclpackage=$tclpackage --with-install-user=$owner --with-install-group=$group --with-directory-mode=$perms"
</del><ins>+ set configure_args "--prefix=$prefix --with-install-user=$owner --with-install-group=$group --with-directory-mode=$perms"
</ins><span class="cx"> # too many users have an incompatible readline in /usr/local, see ticket #10651
</span><span class="cx"> if {$tcl_platform(os) ne {Darwin} || $prefix eq {/usr/local}
</span><span class="cx"> || ([glob -nocomplain /usr/local/lib/lib{readline,history}*] eq {} && [glob -nocomplain /usr/local/include/readline/*.h] eq {})} {
</span><span class="lines">@@ -3533,7 +3507,7 @@
</span><span class="cx"> }
</span><span class="cx">
</span><span class="cx"> # do the actual configure, build and installation of new base
</span><del>- ui_msg "Installing new MacPorts release in $prefix as ${owner}:${group}; permissions ${perms}; Tcl-Package in $tclpackage\n"
</del><ins>+ ui_msg "Installing new MacPorts release in $prefix as ${owner}:${group}; permissions ${perms}\n"
</ins><span class="cx"> if {[catch {system "cd $mp_source_path && ${cc_arg}./configure $configure_args && make SELFUPDATING=1 && make install SELFUPDATING=1"} result]} {
</span><span class="cx"> return -code error "Error installing new MacPorts base: $result"
</span><span class="cx"> }
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcmacports10macports_fastloadtclin"></a>
<div class="delfile"><h4>Deleted: branches/release_2_3/base/src/macports1.0/macports_fastload.tcl.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/macports1.0/macports_fastload.tcl.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/macports1.0/macports_fastload.tcl.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -1,83 +0,0 @@
</span><del>-# -*- coding: utf-8; mode: tcl; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- vim:fenc=utf-8:ft=tcl:et:sw=4:ts=4:sts=4
-# macports_fastload.tcl.in
-# $Id$
-#
-# Copyright (c) 2005-2007, 2009-2010 The MacPorts Project
-# Copyright (c) 2004-2005 Paul Guyot, The MacPorts Project.
-# All rights reserved.
-#
-# Redistribution and use in source and binary forms, with or without
-# modification, are permitted provided that the following conditions
-# are met:
-# 1. Redistributions of source code must retain the above copyright
-# notice, this list of conditions and the following disclaimer.
-# 2. Redistributions in binary form must reproduce the above copyright
-# notice, this list of conditions and the following disclaimer in the
-# documentation and/or other materials provided with the distribution.
-# 3. Neither the name of The MacPorts Project nor the names of its contributors
-# may be used to endorse or promote products derived from this software
-# without specific prior written permission.
-#
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
-# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
-# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
-# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
-# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
-# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
-# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
-# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
-# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
-# POSSIBILITY OF SUCH DAMAGE.
-#
-
-# This script is here to fast load all the MacPorts related packages.
-# This avoids the very expensive globbing of Tcl' package mechanism.
-# Please note that this is not required and base/ should work even if some
-# packages are moved as long as their new location is in Tcl's package paths.
-# However, this file also defines a workaround to avoid conflicts between a /
-# installation of MacPorts and a user installation of MacPorts (on the same box).
-# (this workaround isn't required on 10.4.2).
-#
-# The package command that's replaced in this code works somewhat differently
-# than the original version. In particular, users with multiple copies of a
-# package such as portuninstall (due to obsolete files being left from previous
-# installations) may experience problems due to different package loading
-# behavior.
-#
-if { [regexp {\d+\.\d+\.\d+} [info patchlevel]] &&
- ([package vcompare [info patchlevel] 8.4.7] < 0) } {
- global allpackages
- if {![info exists allpackages]} {
- # Only patch once.
- array set allpackages {}
- rename package package_native
- proc package {args} {
- global allpackages
- if {([lindex $args 0] == "ifneeded") && ([llength $args] == 4)} {
- set package_name [lindex $args 1]
- set package_version [lindex $args 2]
- set package_key ${package_name}::${package_version}
- if {![info exists allpackages($package_key)]} {
- set allpackages($package_key) 1
- set result [eval package_native $args]
- } else {
- set result ""
- }
- } else {
- set result [eval package_native $args]
- }
- return $result
- }
- }
-}
-
-set sharetcldir [file normalize [file join [file dirname [info script]] ..]]
-if {[file exists $sharetcldir]} {
- foreach dir [glob -directory $sharetcldir *] {
- set pkgindex [file join $dir pkgIndex.tcl]
- if [file exists $pkgindex] {
- source $pkgindex
- }
- }
-}
</del></span></pre></div>
<a id="branchesrelease_2_3basesrcmacports10macports_test_autoconftclin"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/macports1.0/macports_test_autoconf.tcl.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/macports1.0/macports_test_autoconf.tcl.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/macports1.0/macports_test_autoconf.tcl.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -32,6 +32,5 @@
</span><span class="cx"> #
</span><span class="cx">
</span><span class="cx"> namespace eval macports::autoconf {
</span><del>- variable macports_tcl_dir "@macports_tcl_dir@"
</del><span class="cx"> variable prefix "@prefix@"
</span><span class="cx"> }
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcmacports10testsmacportstest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/macports1.0/tests/macports.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/macports1.0/tests/macports.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/macports1.0/tests/macports.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -7,7 +7,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../macports_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> # clean leftovers from interrupted tests
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcmacports10testsmacports_dlisttest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/macports1.0/tests/macports_dlist.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/macports1.0/tests/macports_dlist.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/macports1.0/tests/macports_dlist.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -4,7 +4,6 @@
</span><span class="cx"> namespace import tcltest::*
</span><span class="cx">
</span><span class="cx"> source ../macports_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> # Debug options
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcmacports10testsmacports_utiltest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/macports1.0/tests/macports_util.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/macports1.0/tests/macports_util.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/macports1.0/tests/macports_util.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -4,7 +4,6 @@
</span><span class="cx"> namespace import tcltest::*
</span><span class="cx">
</span><span class="cx"> source ../macports_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx">
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcpackage10Makefilein"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/package1.0/Makefile.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/package1.0/Makefile.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/package1.0/Makefile.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -1,14 +1,14 @@
</span><span class="cx"> srcdir = @srcdir@
</span><span class="cx"> VPATH = @srcdir@
</span><span class="cx">
</span><del>-INSTALLDIR= ${DESTDIR}${datadir}/macports/Tcl/package1.0
</del><ins>+include ../../Mk/macports.autoconf.mk
</ins><span class="cx">
</span><ins>+INSTALLDIR= ${DESTDIR}${TCL_PACKAGE_PATH}/package1.0
+
</ins><span class="cx"> SRCS= package.tcl portdmg.tcl portmdmg.tcl portmpkg.tcl portpkg.tcl \
</span><span class="cx"> portrpm.tcl portsrpm.tcl portdpkg.tcl portunarchive.tcl \
</span><span class="cx"> portarchivefetch.tcl
</span><span class="cx">
</span><del>-include ../../Mk/macports.autoconf.mk
-
</del><span class="cx"> all:: pkgIndex.tcl
</span><span class="cx">
</span><span class="cx"> pkgIndex.tcl: $(SRCS)
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcpackage10package_test_autoconftclin"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/package1.0/package_test_autoconf.tcl.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/package1.0/package_test_autoconf.tcl.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/package1.0/package_test_autoconf.tcl.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -32,7 +32,6 @@
</span><span class="cx"> #
</span><span class="cx">
</span><span class="cx"> namespace eval macports::autoconf {
</span><del>- variable macports_tcl_dir "@macports_tcl_dir@"
</del><span class="cx"> variable prefix "@prefix@"
</span><span class="cx"> }
</span><span class="cx">
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcpackage10testsportarchivefetchtest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/package1.0/tests/portarchivefetch.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/package1.0/tests/portarchivefetch.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/package1.0/tests/portarchivefetch.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../package_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcpackage10testsportdmgtest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/package1.0/tests/portdmg.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/package1.0/tests/portdmg.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/package1.0/tests/portdmg.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../package_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcpackage10testsportdpkgtest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/package1.0/tests/portdpkg.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/package1.0/tests/portdpkg.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/package1.0/tests/portdpkg.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../package_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcpackage10testsportmdmgtest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/package1.0/tests/portmdmg.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/package1.0/tests/portmdmg.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/package1.0/tests/portmdmg.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../package_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcpackage10testsportmpkgtest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/package1.0/tests/portmpkg.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/package1.0/tests/portmpkg.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/package1.0/tests/portmpkg.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../package_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcpackage10testsportpkgtest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/package1.0/tests/portpkg.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/package1.0/tests/portpkg.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/package1.0/tests/portpkg.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../package_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcpextlib10Makefilein"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/pextlib1.0/Makefile.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/pextlib1.0/Makefile.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/pextlib1.0/Makefile.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -1,6 +1,8 @@
</span><span class="cx"> srcdir = @srcdir@
</span><span class="cx"> VPATH = @srcdir@
</span><span class="cx">
</span><ins>+include ../../Mk/macports.autoconf.mk
+
</ins><span class="cx"> OBJS= \
</span><span class="cx"> Pextlib.o strsed.o fgetln.o md5cmd.o setmode.o xinstall.o \
</span><span class="cx"> fs-traverse.o strcasecmp.o vercomp.o filemap.o base32cmd.o \
</span><span class="lines">@@ -12,16 +14,15 @@
</span><span class="cx"> endif
</span><span class="cx">
</span><span class="cx"> SHLIB_NAME= Pextlib${SHLIB_SUFFIX}
</span><del>-INSTALLDIR= ${DESTDIR}${datadir}/macports/Tcl/pextlib1.0
</del><ins>+INSTALLDIR= ${DESTDIR}${TCL_PACKAGE_PATH}/pextlib1.0
</ins><span class="cx">
</span><del>-include ../../Mk/macports.autoconf.mk
</del><span class="cx"> include $(srcdir)/../../Mk/macports.tea.mk
</span><span class="cx">
</span><span class="cx"> CFLAGS+= ${CURL_CFLAGS} ${MD5_CFLAGS} ${READLINE_CFLAGS}
</span><span class="cx"> LIBS+= ${CURL_LIBS} ${MD5_LIBS} ${READLINE_LIBS}
</span><span class="cx"> ifeq ($(shell uname), Darwin)
</span><span class="cx"> LIBS+= ../registry2.0/registry${SHLIB_SUFFIX}
</span><del>-SHLIB_LDFLAGS+= -install_name ${datadir}/macports/Tcl/pextlib1.0/${SHLIB_NAME}
</del><ins>+SHLIB_LDFLAGS+= -install_name ${TCL_PACKAGE_PATH}/pextlib1.0/${SHLIB_NAME}
</ins><span class="cx"> ${SHLIB_NAME}: ../registry2.0/registry${SHLIB_SUFFIX}
</span><span class="cx"> endif
</span><span class="cx">
</span><span class="cx">Property changes on: branches/release_2_3/base/src/pextlib1.0/Makefile.in
</span><span class="cx">___________________________________________________________________
</span></span></pre></div>
<a id="svnmergeinfo"></a>
<div class="modfile"><h4>Modified: svn:mergeinfo</h4></div>
<span class="cx">/branches/gsoc09-logging/base/src/pextlib1.0/Makefile:51231-60371
</span><span class="cx">/branches/gsoc11-rev-upgrade/base/src/pextlib1.0/Makefile:78828-88375
</span><span class="cx">/branches/gsoc13-tests/src/pextlib1.0/Makefile.in:106692-111324
</span><span class="cx">/branches/universal-sanity/base/src/pextlib1.0/Makefile:51872-52323
</span><span class="cx">/branches/variant-descs-14482/base/src/pextlib1.0/Makefile:34469-34855,34900-37508,37511-37512,41040-41463,42575-42626,42640-42659
</span><span class="cx">/users/perry/base-bugs_and_notes/src/pextlib1.0/Makefile:45682-46060
</span><span class="cx">/users/perry/base-select/src/pextlib1.0/Makefile:44044-44692
</span><span class="cx"> + /branches/gsoc08-privileges/base/src/pextlib1.0/Makefile:37343-46937
</span><span class="cx">/branches/gsoc09-logging/base/src/pextlib1.0/Makefile:51231-60371
</span><span class="cx">/branches/gsoc11-rev-upgrade/base/src/pextlib1.0/Makefile:78828-88375
</span><span class="cx">/branches/gsoc13-tests/src/pextlib1.0/Makefile.in:106692-111324
</span><span class="cx">/branches/universal-sanity/base/src/pextlib1.0/Makefile:51872-52323
</span><span class="cx">/branches/variant-descs-14482/base/src/pextlib1.0/Makefile:34469-34855,34900-37508,37511-37512,41040-41463,42575-42626,42640-42659
</span><span class="cx">/trunk/base/src/pextlib1.0/Makefile.in:118562-118569,119169
</span><span class="cx">/users/perry/base-bugs_and_notes/src/pextlib1.0/Makefile:45682-46060
</span><span class="cx">/users/perry/base-select/src/pextlib1.0/Makefile:44044-44692
</span><a id="branchesrelease_2_3basesrcpkg_mkindexshin"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/pkg_mkindex.sh.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/pkg_mkindex.sh.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/pkg_mkindex.sh.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -30,6 +30,7 @@
</span><span class="cx">
</span><span class="cx"> TCLSH=@INTREE_TCLSH@
</span><span class="cx"> GREP=@GREP@
</span><ins>+LIB_PATH=`dirname $TCLSH`
</ins><span class="cx">
</span><span class="cx"> if [ $# = 0 ]; then
</span><span class="cx"> echo "Usage: $0 <directory list>"
</span><span class="lines">@@ -37,7 +38,8 @@
</span><span class="cx"> fi
</span><span class="cx">
</span><span class="cx"> for dir in $@; do
</span><del>- echo "pkg_mkIndex -verbose -- $dir *.tcl *.dylib *.so" | env DYLD_LIBRARY_PATH=`dirname $TCLSH` $TCLSH 2>&1 \
</del><ins>+ echo "pkg_mkIndex -verbose -- $dir *.tcl *.dylib *.so" \
+ | env DYLD_LIBRARY_PATH=$LIB_PATH LD_LIBRARY_PATH=$LIB_PATH $TCLSH 2>&1 \
</ins><span class="cx"> | $GREP "^warning: " && exit 1
</span><span class="cx"> done
</span><span class="cx">
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcportMakefilein"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port/Makefile.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port/Makefile.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port/Makefile.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -1,16 +1,14 @@
</span><span class="cx"> srcdir = @srcdir@
</span><span class="cx"> VPATH = @srcdir@
</span><span class="cx">
</span><ins>+include ../../Mk/macports.autoconf.mk
+
</ins><span class="cx"> INSTALLDIR= ${DESTDIR}${prefix}
</span><span class="cx"> TOPSRCDIR= ../..
</span><span class="cx"> SCRIPTS= portmirror portindex port
</span><span class="cx">
</span><del>-edit = sed \
- -e 's,@TCLSH\@,$(TCLSH),g' \
- -e 's,@macports_tcl_dir\@,$(macports_tcl_dir),g'
</del><ins>+edit = sed -e 's,@TCLSH\@,$(TCLSH),g'
</ins><span class="cx">
</span><del>-include ../../Mk/macports.autoconf.mk
-
</del><span class="cx"> .PHONY: mkdirs
</span><span class="cx">
</span><span class="cx"> all: ${SCRIPTS}
</span><span class="lines">@@ -41,3 +39,4 @@
</span><span class="cx"> $(INSTALL) -o ${DSTUSR} -g ${DSTGRP} -m 555 port portindex portmirror ${INSTALLDIR}/bin/
</span><span class="cx"> $(INSTALL) -o ${DSTUSR} -g ${DSTGRP} -m 444 $(srcdir)/port-help.tcl ${INSTALLDIR}/var/macports/
</span><span class="cx"> cd ${INSTALLDIR}/bin && $(LN_S) -f port portf
</span><ins>+ cd ${INSTALLDIR}/bin && $(LN_S) -f ${TCLSH} port-tclsh
</ins></span></pre></div>
<a id="branchesrelease_2_3basesrcportporttcl"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port/port.tcl (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port/port.tcl 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port/port.tcl 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -43,7 +43,6 @@
</span><span class="cx"> set portclient::progress::hasTermAnsiSend yes
</span><span class="cx"> }
</span><span class="cx">
</span><del>-source [file join "@macports_tcl_dir@" macports1.0 macports_fastload.tcl]
</del><span class="cx"> package require macports
</span><span class="cx"> package require Pextlib 1.0
</span><span class="cx">
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcportportindextcl"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port/portindex.tcl (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port/portindex.tcl 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port/portindex.tcl 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -4,7 +4,6 @@
</span><span class="cx"> # if requested
</span><span class="cx"> # $Id$
</span><span class="cx">
</span><del>-source [file join "@macports_tcl_dir@" macports1.0 macports_fastload.tcl]
</del><span class="cx"> package require macports
</span><span class="cx"> package require Pextlib
</span><span class="cx">
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcportportmirrortcl"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port/portmirror.tcl (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port/portmirror.tcl 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port/portmirror.tcl 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -8,7 +8,6 @@
</span><span class="cx"> # Updates the distfiles to current distfiles by deleting old stuff.
</span><span class="cx"> # Uses the database.
</span><span class="cx">
</span><del>-source [file join "@macports_tcl_dir@" macports1.0 macports_fastload.tcl]
</del><span class="cx"> package require macports
</span><span class="cx"> package require Pextlib
</span><span class="cx">
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10Makefilein"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/Makefile.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/Makefile.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/Makefile.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -1,8 +1,10 @@
</span><span class="cx"> srcdir = @srcdir@
</span><span class="cx"> VPATH = @srcdir@
</span><span class="cx">
</span><del>-INSTALLDIR= ${DESTDIR}${datadir}/macports/Tcl/port1.0
</del><ins>+include ../../Mk/macports.autoconf.mk
</ins><span class="cx">
</span><ins>+INSTALLDIR= ${DESTDIR}${TCL_PACKAGE_PATH}/port1.0
+
</ins><span class="cx"> SRCS_AUTOCONF= port_autoconf.tcl
</span><span class="cx"> SRCS= port.tcl portchecksum.tcl portconfigure.tcl portextract.tcl \
</span><span class="cx"> portfetch.tcl portmain.tcl portbuild.tcl portpatch.tcl portutil.tcl \
</span><span class="lines">@@ -13,7 +15,6 @@
</span><span class="cx"> portdistfiles.tcl fetch_common.tcl portsandbox.tcl
</span><span class="cx">
</span><span class="cx"> include $(srcdir)/../../Mk/macports.subdir.mk
</span><del>-include ../../Mk/macports.autoconf.mk
</del><span class="cx">
</span><span class="cx"> .PHONY: test
</span><span class="cx">
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10port_autoconftclin"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/port_autoconf.tcl.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/port_autoconf.tcl.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/port_autoconf.tcl.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -80,4 +80,5 @@
</span><span class="cx"> variable install_user "@DSTUSR@"
</span><span class="cx"> variable install_group "@DSTGRP@"
</span><span class="cx"> variable prefix "@prefix_expanded@"
</span><ins>+ variable tcl_package_path "@TCL_PACKAGE_PATH@"
</ins><span class="cx"> }
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10port_test_autoconftclin"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/port_test_autoconf.tcl.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/port_test_autoconf.tcl.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/port_test_autoconf.tcl.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -32,6 +32,5 @@
</span><span class="cx"> #
</span><span class="cx">
</span><span class="cx"> namespace eval macports::autoconf {
</span><del>- variable macports_tcl_dir "@macports_tcl_dir@"
</del><span class="cx"> variable prefix "@prefix@"
</span><span class="cx"> }
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10porttracetcl"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/porttrace.tcl (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/porttrace.tcl 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/porttrace.tcl 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -57,7 +57,7 @@
</span><span class="cx">
</span><span class="cx"> # Launch darwintrace.dylib.
</span><span class="cx">
</span><del>- set tracelib_path [file join ${portutil::autoconf::prefix} share macports Tcl darwintrace1.0 darwintrace.dylib]
</del><ins>+ set tracelib_path [file join ${portutil::autoconf::tcl_package_path} darwintrace1.0 darwintrace.dylib]
</ins><span class="cx">
</span><span class="cx"> if {[info exists env(DYLD_INSERT_LIBRARIES)] && [string length "$env(DYLD_INSERT_LIBRARIES)"] > 0} {
</span><span class="cx"> set env(DYLD_INSERT_LIBRARIES) "${env(DYLD_INSERT_LIBRARIES)}:${tracelib_path}"
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10testsportactivatetest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/tests/portactivate.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/tests/portactivate.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/tests/portactivate.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../port_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10testsportchecksumtest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/tests/portchecksum.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/tests/portchecksum.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/tests/portchecksum.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../port_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10testsportcleantest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/tests/portclean.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/tests/portclean.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/tests/portclean.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../port_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10testsportdeactivatetest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/tests/portdeactivate.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/tests/portdeactivate.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/tests/portdeactivate.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../port_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10testsportdependstest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/tests/portdepends.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/tests/portdepends.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/tests/portdepends.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../port_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10testsportdistchecktest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/tests/portdistcheck.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/tests/portdistcheck.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/tests/portdistcheck.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../port_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10testsportinstalltest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/tests/portinstall.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/tests/portinstall.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/tests/portinstall.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../port_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10testsportloadtest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/tests/portload.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/tests/portload.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/tests/portload.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../port_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10testsportmaintest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/tests/portmain.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/tests/portmain.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/tests/portmain.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../port_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10testsportpatchtest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/tests/portpatch.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/tests/portpatch.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/tests/portpatch.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../port_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10testsporttesttest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/tests/porttest.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/tests/porttest.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/tests/porttest.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../port_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10testsportuninstalltest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/tests/portuninstall.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/tests/portuninstall.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/tests/portuninstall.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -6,7 +6,6 @@
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../port_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcport10testsportutiltest"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/port1.0/tests/portutil.test (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/port1.0/tests/portutil.test 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/port1.0/tests/portutil.test 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -3,12 +3,10 @@
</span><span class="cx"> package require tcltest 2
</span><span class="cx"> namespace import tcltest::*
</span><span class="cx">
</span><del>-source ../../macports1.0/macports_fastload.tcl
</del><span class="cx">
</span><span class="cx"> set pwd [file dirname [file normalize $argv0]]
</span><span class="cx">
</span><span class="cx"> source ../port_test_autoconf.tcl
</span><del>-source $macports::autoconf::macports_tcl_dir/macports1.0/macports_fastload.tcl
</del><span class="cx"> package require macports 1.0
</span><span class="cx">
</span><span class="cx"> array set ui_options {}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcregistry20Makefilein"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/registry2.0/Makefile.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/registry2.0/Makefile.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/registry2.0/Makefile.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -3,6 +3,8 @@
</span><span class="cx"> srcdir = @srcdir@
</span><span class="cx"> VPATH = @srcdir@
</span><span class="cx">
</span><ins>+include ../../Mk/macports.autoconf.mk
+
</ins><span class="cx"> SRCS_AUTOCONF = registry_autoconf.tcl
</span><span class="cx"> SRCS = registry.tcl registry_util.tcl receipt_flat.tcl receipt_sqlite.tcl portimage.tcl portuninstall.tcl
</span><span class="cx"> OBJS = registry.o util.o \
</span><span class="lines">@@ -12,9 +14,8 @@
</span><span class="cx"> #graph.o graphobj.o
</span><span class="cx">
</span><span class="cx"> SHLIB_NAME= registry${SHLIB_SUFFIX}
</span><del>-INSTALLDIR= ${DESTDIR}${datadir}/macports/Tcl/registry2.0
</del><ins>+INSTALLDIR= ${DESTDIR}${TCL_PACKAGE_PATH}/registry2.0
</ins><span class="cx">
</span><del>-include ../../Mk/macports.autoconf.mk
</del><span class="cx"> include $(srcdir)/../../Mk/macports.tea.mk
</span><span class="cx">
</span><span class="cx"> pkgIndex.tcl: $(SRCS) $(SRCS_AUTOCONF)
</span><span class="lines">@@ -37,7 +38,6 @@
</span><span class="cx"> rm -f registry_autoconf.tcl
</span><span class="cx">
</span><span class="cx"> install:: all $(SHLIB_NAME)
</span><del>- [ ! -d $(DESTDIR)${datadir}/macports/Tcl/registry1.0 ] || rm -vrf $(DESTDIR)${datadir}/macports/Tcl/registry1.0
</del><span class="cx"> $(INSTALL) -d -o ${DSTUSR} -g ${DSTGRP} -m ${DSTMODE} ${INSTALLDIR}
</span><span class="cx"> $(INSTALL) -o ${DSTUSR} -g ${DSTGRP} -m 444 ${SHLIB_NAME} ${INSTALLDIR}
</span><span class="cx"> $(SILENT) set -x; for file in ${SRCS}; do \
</span></span></pre></div>
<a id="branchesrelease_2_3basesrctclobjc10Makefilein"></a>
<div class="modfile"><h4>Modified: branches/release_2_3/base/src/tclobjc1.0/Makefile.in (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/tclobjc1.0/Makefile.in 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/tclobjc1.0/Makefile.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -1,11 +1,12 @@
</span><span class="cx"> srcdir = @srcdir@
</span><span class="cx"> VPATH = @srcdir@
</span><span class="cx">
</span><ins>+include ../../Mk/macports.autoconf.mk
+
</ins><span class="cx"> OBJS= tclobjc.o tclobjc_types.o MPMethodSignatureExtensions.o objc_encoding.o
</span><span class="cx"> SHLIB_NAME= tclobjc${SHLIB_SUFFIX}
</span><del>-INSTALLDIR= ${DESTDIR}${datadir}/macports/Tcl/tclobjc1.0
</del><ins>+INSTALLDIR= ${DESTDIR}${TCL_PACKAGE_PATH}/tclobjc1.0
</ins><span class="cx">
</span><del>-include ../../Mk/macports.autoconf.mk
</del><span class="cx"> include $(srcdir)/../../Mk/macports.tea.mk
</span><span class="cx">
</span><span class="cx"> LDFLAGS+= ${OBJC_FOUNDATION_LDFLAGS}
</span></span></pre></div>
<a id="branchesrelease_2_3basesrcupgrade_sources_conf_defaulttcl"></a>
<div class="delfile"><h4>Deleted: branches/release_2_3/base/src/upgrade_sources_conf_default.tcl (119169 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/upgrade_sources_conf_default.tcl 2014-04-18 21:38:45 UTC (rev 119169)
+++ branches/release_2_3/base/src/upgrade_sources_conf_default.tcl 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -1,121 +0,0 @@
</span><del>-#!/usr/bin/env tclsh
-#
-# $Id$
-#
-# Upgrade sources.conf for a given prefix (passed as the first and only
-# argument).
-#
-# For an rsync: repository, if it is the standard MacPorts one and not
-# already tagged, then make it default, if another wasn't already default.
-# For a file:// respository, if it is an svn checkout from the MacPorts
-# server, then make it default if another hasn't already been tagged.
-#
-
-if {[llength $::argv] == 0} {
- puts "Usage: ${::argv0} <prefix>"
- exit 1
-}
-
-set prefix [lindex $::argv 0]
-set sourcesConf ${prefix}/etc/macports/sources.conf
-if {[catch {set sourcesConfChannel [open $sourcesConf r]}]} {
- exit 0
-}
-
-if {[file executable /usr/bin/mktemp]} {
- set mktemp /usr/bin/mktemp
-} elseif {[file executable /bin/mktemp]} {
- set mktemp /bin/mktemp
-} else {
- set mktemp mktemp
-}
-
-set mktempChannel [open "|$mktemp -t macports_sources_upgrade.XXXXXXXXXX" r]
-set tempfile [read -nonewline $mktempChannel]
-close $mktempChannel
-
-set tempfileChannel [open $tempfile w]
-set defaultSeen false
-set defaultWritten false
-
-while {[gets $sourcesConfChannel line] >= 0} {
- set addDefault false
- if {!$defaultSeen && ![regexp {^\s*#|^$} $line]} {
- if {[regexp {^([\w-]+://\S+)(?:\s+\[(\w+(?:,\w+)*)\])?$} $line -> url flags]} {
- set flags [split $flags ,]
- if {[lsearch $flags default] >= 0} {
- set defaultSeen true
- } elseif {[regexp {rsync://rsync\.(macports|darwinports)\.org/(release|dpupdate)/d?ports} $url]} {
- set addDefault true
- } elseif {[regexp {file://(/.+)} $url -> filepath]} {
- if {[file exists [file join ${filepath} .svn]]} {
- if {![info exists svnCmd]} {
- set svnCmd ""
- foreach path [concat [list ${prefix}/bin] [split $env(PATH) :]] {
- if {[file executable ${path}/svn]} {
- set svnCmd ${path}/svn
- break
- }
- }
- }
- if {$svnCmd eq ""} {
- puts "WARNING: Unable to check svn URL for '$filepath' because no svn command could be found; please manually verify $sourcesConf!"
- continue
- }
- if {![catch {set svnChannel [open "|$svnCmd info ${filepath}" r]} err]} {
- set svnURL {}
- while {[gets $svnChannel svnLine] >= 0} {
- regexp {^URL: (.*)} $svnLine -> svnURL
- }
- if {[catch {close $svnChannel} err]} {
- puts $err
- puts "WARNING: Unable to check svn URL for '$filepath'; please manually verify $sourcesConf!"
- }
- if {[regexp {^https?://svn\.(macports|macosforge)\.org/repository/macports/trunk/dports} $svnURL]} {
- set addDefault true
- }
- } else {
- puts $err
- puts "WARNING: Unable to check svn URL for '$filepath'; please manually verify $sourcesConf!"
- }
- }
- }
- if {$addDefault} {
- lappend flags default
- set line "$url \[[join $flags ,]\]"
- set defaultSeen true
- set defaultWritten true
- }
- }
- }
- puts $tempfileChannel $line
-}
-close $tempfileChannel
-close $sourcesConfChannel
-
-if {$defaultWritten} {
- set attributes [file attributes ${sourcesConf}]
- if {[catch {file rename ${sourcesConf} "${sourcesConf}.mpsaved"}]} {
- file rename -force ${sourcesConf} "${sourcesConf}.mpsaved_[clock seconds]"
- }
- file rename ${tempfile} ${sourcesConf}
- eval file attributes ${sourcesConf} $attributes
-} else {
- file delete ${tempfile}
- if {!$defaultSeen} {
- puts "[string repeat - 72]
-Warning, your source config file at:
-
- $sourcesConf
-
-needs to have a \[default\] tag added to the primary MacPorts repository,
-however the proper entry could not be determined. Please add the tag
-manually by either appending \[default\] to the end of the correct line,
-or if there are already tags, adding it to the list, e.g.
-\[nosync,default\].
-[string repeat - 72]"
- }
-}
-
-exit 0
-
</del></span></pre></div>
<a id="branchesrelease_2_3basesrcupgrade_sources_conf_defaulttclinfromrev118559trunkbasesrcupgrade_sources_conf_defaulttclin"></a>
<div class="copfile"><h4>Copied: branches/release_2_3/base/src/upgrade_sources_conf_default.tcl.in (from rev 118559, trunk/base/src/upgrade_sources_conf_default.tcl.in) (0 => 119170)</h4>
<pre class="diff"><span>
<span class="info">--- branches/release_2_3/base/src/upgrade_sources_conf_default.tcl.in (rev 0)
+++ branches/release_2_3/base/src/upgrade_sources_conf_default.tcl.in 2014-04-18 21:57:35 UTC (rev 119170)
</span><span class="lines">@@ -0,0 +1,121 @@
</span><ins>+#!@TCLSH@
+#
+# $Id$
+#
+# Upgrade sources.conf for a given prefix (passed as the first and only
+# argument).
+#
+# For an rsync: repository, if it is the standard MacPorts one and not
+# already tagged, then make it default, if another wasn't already default.
+# For a file:// respository, if it is an svn checkout from the MacPorts
+# server, then make it default if another hasn't already been tagged.
+#
+
+if {[llength $::argv] == 0} {
+ puts "Usage: ${::argv0} <prefix>"
+ exit 1
+}
+
+set prefix [lindex $::argv 0]
+set sourcesConf ${prefix}/etc/macports/sources.conf
+if {[catch {set sourcesConfChannel [open $sourcesConf r]}]} {
+ exit 0
+}
+
+if {[file executable /usr/bin/mktemp]} {
+ set mktemp /usr/bin/mktemp
+} elseif {[file executable /bin/mktemp]} {
+ set mktemp /bin/mktemp
+} else {
+ set mktemp mktemp
+}
+
+set mktempChannel [open "|$mktemp -t macports_sources_upgrade.XXXXXXXXXX" r]
+set tempfile [read -nonewline $mktempChannel]
+close $mktempChannel
+
+set tempfileChannel [open $tempfile w]
+set defaultSeen false
+set defaultWritten false
+
+while {[gets $sourcesConfChannel line] >= 0} {
+ set addDefault false
+ if {!$defaultSeen && ![regexp {^\s*#|^$} $line]} {
+ if {[regexp {^([\w-]+://\S+)(?:\s+\[(\w+(?:,\w+)*)\])?$} $line -> url flags]} {
+ set flags [split $flags ,]
+ if {[lsearch $flags default] >= 0} {
+ set defaultSeen true
+ } elseif {[regexp {rsync://rsync\.(macports|darwinports)\.org/(release|dpupdate)/d?ports} $url]} {
+ set addDefault true
+ } elseif {[regexp {file://(/.+)} $url -> filepath]} {
+ if {[file exists [file join ${filepath} .svn]]} {
+ if {![info exists svnCmd]} {
+ set svnCmd ""
+ foreach path [concat [list ${prefix}/bin] [split $env(PATH) :]] {
+ if {[file executable ${path}/svn]} {
+ set svnCmd ${path}/svn
+ break
+ }
+ }
+ }
+ if {$svnCmd eq ""} {
+ puts "WARNING: Unable to check svn URL for '$filepath' because no svn command could be found; please manually verify $sourcesConf!"
+ continue
+ }
+ if {![catch {set svnChannel [open "|$svnCmd info ${filepath}" r]} err]} {
+ set svnURL {}
+ while {[gets $svnChannel svnLine] >= 0} {
+ regexp {^URL: (.*)} $svnLine -> svnURL
+ }
+ if {[catch {close $svnChannel} err]} {
+ puts $err
+ puts "WARNING: Unable to check svn URL for '$filepath'; please manually verify $sourcesConf!"
+ }
+ if {[regexp {^https?://svn\.(macports|macosforge)\.org/repository/macports/trunk/dports} $svnURL]} {
+ set addDefault true
+ }
+ } else {
+ puts $err
+ puts "WARNING: Unable to check svn URL for '$filepath'; please manually verify $sourcesConf!"
+ }
+ }
+ }
+ if {$addDefault} {
+ lappend flags default
+ set line "$url \[[join $flags ,]\]"
+ set defaultSeen true
+ set defaultWritten true
+ }
+ }
+ }
+ puts $tempfileChannel $line
+}
+close $tempfileChannel
+close $sourcesConfChannel
+
+if {$defaultWritten} {
+ set attributes [file attributes ${sourcesConf}]
+ if {[catch {file rename ${sourcesConf} "${sourcesConf}.mpsaved"}]} {
+ file rename -force ${sourcesConf} "${sourcesConf}.mpsaved_[clock seconds]"
+ }
+ file rename ${tempfile} ${sourcesConf}
+ eval file attributes ${sourcesConf} $attributes
+} else {
+ file delete ${tempfile}
+ if {!$defaultSeen} {
+ puts "[string repeat - 72]
+Warning, your source config file at:
+
+ $sourcesConf
+
+needs to have a \[default\] tag added to the primary MacPorts repository,
+however the proper entry could not be determined. Please add the tag
+manually by either appending \[default\] to the end of the correct line,
+or if there are already tags, adding it to the list, e.g.
+\[nosync,default\].
+[string repeat - 72]"
+ }
+}
+
+exit 0
+
</ins></span></pre>
</div>
</div>
</body>
</html>