Ticket #17182: macports.tcl.diff

macports.tcl

@@ -1069 +1069 @@
 
 proc _pathtest {mport depspec} {
     global env
-    set depregex [lindex [split $depspec :] 1]
     set prefix [_mportkey $mport prefix] 
+    set x11prefix [_mportkey $mport x11prefix]
+    #set frameworks_dir [_mportkey $mport frameworks_dir]
+    #set applications_dir [_mportkey $mport applications_dir]
+    
+    set depspec [regsub -all {\\\$\{prefix\}} $depspec $prefix]
+    set depspec [regsub -all {\\\$\{x11prefix\}} $depspec $x11prefix]
+    #set depspec [regsub -all {\\\$\{frameworks_dir\}} $depspec $frameworks_dir]
+    #set depspec [regsub -all {\\\$\{applications_dir\}} $depspec $applications_dir]
+    
+    set depregex [lindex [split $depspec :] 1]
     
     # separate directory from regex
     set fullname $depregex