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

[jmr at macports.org]

Revision: 60382
          http://trac.macports.org/changeset/60382
Author:   jmr at macports.org
Date:     2009-11-10 07:01:34 -0800 (Tue, 10 Nov 2009)
Log Message:
-----------
make 'port provides' work on symlinks that point to a directory

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

Modified: trunk/base/src/port/port.tcl
===================================================================
--- trunk/base/src/port/port.tcl	2009-11-10 14:54:09 UTC (rev 60381)
+++ trunk/base/src/port/port.tcl	2009-11-10 15:01:34 UTC (rev 60382)
@@ -1934,7 +1934,7 @@
     foreach filename $portlist {
         set file [file normalize $filename]
         if {[file exists $file]} {
-            if {![file isdirectory $file]} {
+            if {![file isdirectory $file] || [file type $file] == "link"} {
                 set port [registry::file_registered $file]
                 if { $port != 0 } {
                     puts "$file is provided by: $port"
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20091110/d613f690/attachment.html>