Changeset 2088 for trunk/base

Timestamp:

Feb 26, 2003, 11:17:15 PM (21 years ago)

Author:

kevin

Message:

Debug print acknowledging when receipts are found.
Removed cruft from portutil.

File:

• trunk/base/src/darwinports1.0/darwinports.tcl (modified) (2 diffs)

trunk/base/src/darwinports1.0/darwinports.tcl

@@ -284 +284 @@
         set res [$workername eval registry_exists \${portname} \${portversion}]
         if {$res != ""} {
+                ui_debug "Found Dependency: receipt: $res"
                 return 1
         } else {
@@ -291 +292 @@
 
 proc _dportexec {target dport} {
+        # xxx: set the work path?
         set workername [ditem_key $dport workername]
-        return [$workername eval eval_targets $target]
+        if {![catch {$workername eval eval_targets $target} result]} {
+                # xxx: clean after installing?
+                #$workername eval eval_targets clean
+        }
+        
 }