[67112] trunk/base/src/port/portindex.tcl

[jmr at macports.org]

Revision: 67112
          http://trac.macports.org/changeset/67112
Author:   jmr at macports.org
Date:     2010-04-29 01:16:08 -0700 (Thu, 29 Apr 2010)
Log Message:
-----------
portindex: make -o work with relative paths

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

Modified: trunk/base/src/port/portindex.tcl
===================================================================
--- trunk/base/src/port/portindex.tcl	2010-04-29 07:48:07 UTC (rev 67111)
+++ trunk/base/src/port/portindex.tcl	2010-04-29 08:16:08 UTC (rev 67112)
@@ -127,7 +127,7 @@
                 set ui_options(ports_debug) yes
             } elseif {$arg == "-o"} { # Set output directory
                 incr i
-                set outdir [lindex $argv $i]
+                set outdir [file join [pwd] [lindex $argv $i]]
             } elseif {$arg == "-p"} { # Set platform
                 incr i
                 set platlist [split [lindex $argv $i] _]
@@ -144,7 +144,7 @@
             }
         }
         default {
-            set directory $arg
+            set directory [file join [pwd] $arg]
         }
     }
 }
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20100429/7db2c7b6/attachment.html>