[66610] trunk/base/src/port

[raimue at macports.org]

Revision: 66610
          http://trac.macports.org/changeset/66610
Author:   raimue at macports.org
Date:     2010-04-17 20:56:24 -0700 (Sat, 17 Apr 2010)
Log Message:
-----------
port: Fix syntax error from r66608

Revision Links:
--------------
    http://trac.macports.org/changeset/66608

Modified Paths:
--------------
    trunk/base/src/port/port.tcl
    trunk/base/src/port/portindex.tcl
    trunk/base/src/port/portmirror.tcl

Modified: trunk/base/src/port/port.tcl
===================================================================
--- trunk/base/src/port/port.tcl	2010-04-18 03:54:43 UTC (rev 66609)
+++ trunk/base/src/port/port.tcl	2010-04-18 03:56:24 UTC (rev 66610)
@@ -34,8 +34,8 @@
 # ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 # POSSIBILITY OF SUCH DAMAGE.
 
-if {([file tail [pwd]] == "src" && [file exists [set dir macports1.0]/macports_fastload.tcl]])
-        || ([file tail [pwd]] == "base" && [file exists [set dir src/macports1.0]/macports_fastload.tcl]])} {
+if {([file tail [pwd]] == "src" && [file exists [set dir macports1.0]/macports_fastload.tcl])
+        || ([file tail [pwd]] == "base" && [file exists [set dir src/macports1.0]/macports_fastload.tcl])} {
     # developer mode, source packages from current directory
     source [file join $dir macports_fastload.tcl]
 } else {

Modified: trunk/base/src/port/portindex.tcl
===================================================================
--- trunk/base/src/port/portindex.tcl	2010-04-18 03:54:43 UTC (rev 66609)
+++ trunk/base/src/port/portindex.tcl	2010-04-18 03:56:24 UTC (rev 66610)
@@ -7,8 +7,8 @@
 # if requested
 # $Id$
 
-if {([file tail [pwd]] == "src" && [file exists [set dir macports1.0]/macports_fastload.tcl]])
-        || ([file tail [pwd]] == "base" && [file exists [set dir src/macports1.0]/macports_fastload.tcl]])} {
+if {([file tail [pwd]] == "src" && [file exists [set dir macports1.0]/macports_fastload.tcl])
+        || ([file tail [pwd]] == "base" && [file exists [set dir src/macports1.0]/macports_fastload.tcl])} {
     # developer mode, source packages from current directory
     source [file join $dir macports_fastload.tcl]
 } else {

Modified: trunk/base/src/port/portmirror.tcl
===================================================================
--- trunk/base/src/port/portmirror.tcl	2010-04-18 03:54:43 UTC (rev 66609)
+++ trunk/base/src/port/portmirror.tcl	2010-04-18 03:56:24 UTC (rev 66610)
@@ -11,8 +11,8 @@
 # Updates the distfiles to current distfiles by deleting old stuff.
 # Uses the database.
 
-if {([file tail [pwd]] == "src" && [file exists [set dir macports1.0]/macports_fastload.tcl]])
-        || ([file tail [pwd]] == "base" && [file exists [set dir src/macports1.0]/macports_fastload.tcl]])} {
+if {([file tail [pwd]] == "src" && [file exists [set dir macports1.0]/macports_fastload.tcl])
+        || ([file tail [pwd]] == "base" && [file exists [set dir src/macports1.0]/macports_fastload.tcl])} {
     # developer mode, source packages from current directory
     source [file join $dir macports_fastload.tcl]
 } else {
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20100417/b438bfb6/attachment.html>