Revision
81452
Author
jmr@macports.org
Date
2011-07-30 20:39:03 -0700 (Sat, 30 Jul 2011)

Log Message

only try to fetch in getportdir if the url is in fact a file, not if it's e.g. an unreadable directory

Modified Paths

Diff

Modified: trunk/base/src/macports1.0/macports.tcl (81451 => 81452)


--- trunk/base/src/macports1.0/macports.tcl	2011-07-31 02:59:44 UTC (rev 81451)
+++ trunk/base/src/macports1.0/macports.tcl	2011-07-31 03:39:03 UTC (rev 81452)
@@ -1227,7 +1227,7 @@
     switch ${protocol} {
         file {
             set path [file normalize [string range $url [expr [string length $protocol] + 3] end]]
-            if {[file isdirectory $path]} {
+            if {![file isfile $path]} {
                 return $path
             } else {
                 # need to create a local dir for the exracted port, but only once