Changeset 1229 for trunk/base

Timestamp:

Nov 12, 2002, 10:15:29 AM (21 years ago)

Author:

kevin

Message:

Introduce the ${destroot} can of worms to DarwinPorts.

Location:

trunk/base/src/port1.0

Files:

• portinstall.tcl (modified) (1 diff)
• portmain.tcl (modified) (1 diff)

trunk/base/src/port1.0/portinstall.tcl

@@ -48 +48 @@
 
 proc install_start {args} {
-    global UI_PREFIX portname build.target.install
+    global UI_PREFIX portname build.target.install destroot
 
-    ui_msg "$UI_PREFIX Installing $portname with target ${build.target.install}"
+    ui_msg "$UI_PREFIX Installing ${portname} into ${destroot} with target ${build.target.install}"
+        
+        file mkdir ${destroot}
 }
 

trunk/base/src/port1.0/portmain.tcl

@@ -54 +54 @@
 default workpath {[file join $portpath $workdir]}
 default prefix /opt/local
+default destroot {${workpath}/destroot}
 default filedir files
 default revision 0