[120381] contrib/mpab/gather_archives.sh

[jmr at macports.org]

Revision: 120381
          https://trac.macports.org/changeset/120381
Author:   jmr at macports.org
Date:     2014-05-25 17:05:49 -0700 (Sun, 25 May 2014)
Log Message:
-----------
mpab: use correct tclsh explicitly in gather_archives.sh

Modified Paths:
--------------
    contrib/mpab/gather_archives.sh

Modified: contrib/mpab/gather_archives.sh
===================================================================
--- contrib/mpab/gather_archives.sh	2014-05-25 21:01:39 UTC (rev 120380)
+++ contrib/mpab/gather_archives.sh	2014-05-26 00:05:49 UTC (rev 120381)
@@ -23,6 +23,11 @@
     PREFIX="/opt/local"
 fi
 
+TCLSH=${PREFIX}/bin/port-tclsh
+if [[ ! -x $TCLSH ]]; then
+    TCLSH=/usr/bin/tclsh
+fi
+
 # path where archives should be staged before being uploaded to the master
 if [[ -z "$ULPATH" ]]; then
     ULPATH="archive_staging"
@@ -58,7 +63,7 @@
             aname=$(basename $archive)
             if ! /usr/bin/curl -fIs "${ARCHIVE_SITE}${portname}/${aname}" > /dev/null ; then
                 if [[ -z "$distributable" ]]; then
-                    ./mpexport/base/portmgr/jobs/port_binary_distributable.tcl -v ${portname}
+                    $TCLSH ./mpexport/base/portmgr/jobs/port_binary_distributable.tcl -v ${portname}
                     distributable=$?
                 fi
                 if [[ "$distributable" -eq 0 ]]; then
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.macosforge.org/pipermail/macports-changes/attachments/20140525/60d069a6/attachment.html>