[22013] trunk/base/src/port1.0/portutil.tcl
source_changes at macosforge.org
source_changes at macosforge.org
Wed Feb 14 02:01:52 PST 2007
Revision: 22013
http://trac.macosforge.org/projects/macports/changeset/22013
Author: eridius at macports.org
Date: 2007-02-14 02:01:52 -0800 (Wed, 14 Feb 2007)
Log Message:
-----------
And now that I've committed the last fix, I can take the leisure time to realize it's a bit more readable this way
Modified Paths:
--------------
trunk/base/src/port1.0/portutil.tcl
Modified: trunk/base/src/port1.0/portutil.tcl
===================================================================
--- trunk/base/src/port1.0/portutil.tcl 2007-02-14 09:59:52 UTC (rev 22012)
+++ trunk/base/src/port1.0/portutil.tcl 2007-02-14 10:01:52 UTC (rev 22013)
@@ -519,7 +519,7 @@
set stack [list $arg]
while {[llength $stack] > 0} {
set file [lindex $stack 0]
- if {![string equal [file type $file] link] && [file isdirectory $file]} {
+ if {[string equal [file type $file] directory]} {
# it's a directory
set children [glob -nocomplain -directory $file * .*]
set children [ldelete [ldelete $children $file/.] $file/..]
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/macports-changes/attachments/20070214/1ed74cc6/attachment.html
More information about the macports-changes
mailing list