[43811] trunk/base/src/port/port.tcl

[blb at macports.org]

Revision: 43811
          http://trac.macports.org/changeset/43811
Author:   blb at macports.org
Date:     2008-12-15 01:59:50 -0800 (Mon, 15 Dec 2008)
Log Message:
-----------
src/port/port.tcl - special-case the current pseudo-port (url file://.)
from being searched in PortIndex since it doesn't work (and will get a
more meaningful message a few lines after the location of this change);
otherwise, ports not yet added to PortIndex will fail 'port info'.  Also,
'port info --index' on a port that is in PortIndex will also fail without
this instead of it hitting the "does not work with 'current' pseudo-port"
Regression from r43519

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

Modified: trunk/base/src/port/port.tcl
===================================================================
--- trunk/base/src/port/port.tcl	2008-12-15 09:52:22 UTC (rev 43810)
+++ trunk/base/src/port/port.tcl	2008-12-15 09:59:50 UTC (rev 43811)
@@ -1351,7 +1351,7 @@
             array set portinfo [lindex $result 1]
             set porturl $portinfo(porturl)
             set portdir $portinfo(portdir)
-        } else {
+        } elseif {$porturl ne "file://."} {
             # Extract the portdir from porturl and use it to search PortIndex.
             # Only the last two elements of the path (porturl) make up the
             # portdir.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20081215/ed0524e7/attachment.html>