[29414] trunk/base/src/pextlib1.0/tests/fs-traverse.tcl

source_changes at macosforge.org source_changes at macosforge.org
Sun Sep 23 02:40:13 PDT 2007


Revision: 29414
          http://trac.macosforge.org/projects/macports/changeset/29414
Author:   eridius at macports.org
Date:     2007-09-23 02:40:13 -0700 (Sun, 23 Sep 2007)

Log Message:
-----------
Hack around Darwin's fts_open returning double-slashed paths for roots that end in a slash. Note that this hack is for the test only, fs-traverse will still return the double-slashed paths (#12173).

Modified Paths:
--------------
    trunk/base/src/pextlib1.0/tests/fs-traverse.tcl

Modified: trunk/base/src/pextlib1.0/tests/fs-traverse.tcl
===================================================================
--- trunk/base/src/pextlib1.0/tests/fs-traverse.tcl	2007-09-23 09:34:25 UTC (rev 29413)
+++ trunk/base/src/pextlib1.0/tests/fs-traverse.tcl	2007-09-23 09:40:13 UTC (rev 29414)
@@ -36,7 +36,7 @@
         # Test starting with a slash-ended symlink
         set output [list]
         fs-traverse file $root/a/c/a/ {
-            lappend output $file
+            lappend output [string map {// /} $file]
         }
         check_output $output $trees(sub2)
         
@@ -237,10 +237,10 @@
     
     set trees(sub2) "
         $root/a/c/a/     {link ../d}
-        $root/a/c/a//a   file
-        $root/a/c/a//b   {link ../../b/a}
-        $root/a/c/a//c   directory
-        $root/a/c/a//d   file
+        $root/a/c/a/a   file
+        $root/a/c/a/b   {link ../../b/a}
+        $root/a/c/a/c   directory
+        $root/a/c/a/d   file
     "
     
     set trees(2) "

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/macports-changes/attachments/20070923/1a472546/attachment.html


More information about the macports-changes mailing list