[34371] trunk/base/src/port/port.tcl
raimue at macports.org
raimue at macports.org
Fri Feb 22 10:17:33 PST 2008
Revision: 34371
http://trac.macosforge.org/projects/macports/changeset/34371
Author: raimue at macports.org
Date: 2008-02-22 10:17:33 -0800 (Fri, 22 Feb 2008)
Log Message:
-----------
port/port.tcl:
* port deps shows raw dependencies in verbose mode
* port dependents displays the kind of dependency in verbose mode
Modified Paths:
--------------
trunk/base/src/port/port.tcl
Modified: trunk/base/src/port/port.tcl
===================================================================
--- trunk/base/src/port/port.tcl 2008-02-22 18:11:49 UTC (rev 34370)
+++ trunk/base/src/port/port.tcl 2008-02-22 18:17:33 UTC (rev 34371)
@@ -1554,7 +1554,11 @@
# Check the deps first
foreach dep $deplist {
set depport [lindex $dep 2]
- ui_msg "$depport depends on $portname"
+ if {![macports::ui_isset ports_verbose]} {
+ ui_msg "$depport depends on $portname"
+ } else {
+ ui_msg "$depport depends on $portname (by [lindex $dep 1]:)"
+ }
}
} else {
ui_msg "$portname has no dependents!"
@@ -1814,7 +1818,11 @@
$portinfo($depstype) != ""} {
puts "$portname has $depsdecr dependencies on:"
foreach i $portinfo($depstype) {
- puts "\t[lindex [split [lindex $i 0] :] end]"
+ if {[macports::ui_isset ports_verbose]} {
+ puts "\t$i"
+ } else {
+ puts "\t[lindex [split [lindex $i 0] :] end]"
+ }
}
set nodeps false
}
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/macports-changes/attachments/20080222/2d250f6d/attachment.html
More information about the macports-changes
mailing list