[49003] trunk/base/src/port1.0

[raimue at macports.org]

Revision: 49003
          http://trac.macports.org/changeset/49003
Author:   raimue at macports.org
Date:     2009-04-01 11:54:53 -0700 (Wed, 01 Apr 2009)
Log Message:
-----------
port1.0:
Check for existence of usealtworkpath before reading value

Modified Paths:
--------------
    trunk/base/src/port1.0/portdestroot.tcl
    trunk/base/src/port1.0/portfetch.tcl

Modified: trunk/base/src/port1.0/portdestroot.tcl
===================================================================
--- trunk/base/src/port1.0/portdestroot.tcl	2009-04-01 18:53:32 UTC (rev 49002)
+++ trunk/base/src/port1.0/portdestroot.tcl	2009-04-01 18:54:53 UTC (rev 49003)
@@ -110,7 +110,7 @@
 		return -code error "You can not run this port without elevated privileges. You need to re-run with 'sudo port'.";
 	}
 	
-	if {$usealtworkpath} {
+	if {[info exists usealtworkpath] && $usealtworkpath == "yes"} {
 	    # rewrite destroot.args
 	    set argprefix "=[option prefix]"
 	    set newargprefix "=${altprefix}[option prefix]"

Modified: trunk/base/src/port1.0/portfetch.tcl
===================================================================
--- trunk/base/src/port1.0/portfetch.tcl	2009-04-01 18:53:32 UTC (rev 49002)
+++ trunk/base/src/port1.0/portfetch.tcl	2009-04-01 18:54:53 UTC (rev 49003)
@@ -738,7 +738,7 @@
     if {[info exists distpath] && [info exists dist_subdir] && ![info exists fetch_init_done]} {
 
 		# start gsoc08-privileges
-    	if { $usealtworkpath } {
+	if {[info exists usealtworkpath] && $usealtworkpath == "yes"} {
     	# I have removed ![file writable $distpath] from the if condition as
     	# the writable condition seems to get confused by effective uids.
 			set distpath "$altprefix/[ string range $distpath 1 end ]"
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20090401/8b3f79f2/attachment.html>