Revision
54709
Author
jmr@macports.org
Date
2009-07-31 15:37:42 -0700 (Fri, 31 Jul 2009)

Log Message

don't *always* use the alt build path

Modified Paths

Diff

Modified: trunk/base/src/port1.0/portmain.tcl (54708 => 54709)


--- trunk/base/src/port1.0/portmain.tcl	2009-07-31 22:32:25 UTC (rev 54708)
+++ trunk/base/src/port1.0/portmain.tcl	2009-07-31 22:37:42 UTC (rev 54709)
@@ -134,7 +134,7 @@
 
 # if unable to write to workpath, implies running without either root privileges
 # or a shared directory owned by the group so use ~/.macports
-if { ([info exists workpath] && [file exists $workpath] && ![file writable $workpath]) || [info exists portbuildpath] && ![file writable $portbuildpath] } {
+if { $euid != 0 && ([info exists workpath] && [file exists $workpath] && ![file writable $workpath]) || [info exists portdbpath] && ![file writable [file join $portdbpath build]] } {
 
     set userid [getuid]
     set username [uid_to_name $userid]