Revision
74655
Author
jmr@macports.org
Date
2010-12-26 10:35:31 -0800 (Sun, 26 Dec 2010)

Log Message

add 'logfile' action to print location of port log file(s)

Modified Paths

Diff

Modified: trunk/base/src/port/port.tcl (74654 => 74655)


--- trunk/base/src/port/port.tcl	2010-12-26 18:35:21 UTC (rev 74654)
+++ trunk/base/src/port/port.tcl	2010-12-26 18:35:31 UTC (rev 74655)
@@ -3546,6 +3546,15 @@
                     puts $portfile
                 }
 
+                logfile {
+                    set logfile [file join [macports::getportlogpath $portdir] "main.log"]
+                    if {[file isfile $logfile]} {
+                        puts $logfile
+                    } else {
+                        ui_error "Log file not found for port in $portdir"
+                    }
+                }
+
                 gohome {
                     set homepage ""
 
@@ -3790,6 +3799,7 @@
     cd          [list action_portcmds       [ACTION_ARGS_PORTS]] \
     url         [list action_portcmds       [ACTION_ARGS_PORTS]] \
     file        [list action_portcmds       [ACTION_ARGS_PORTS]] \
+    logfile     [list action_portcmds       [ACTION_ARGS_PORTS]] \
     gohome      [list action_portcmds       [ACTION_ARGS_PORTS]] \
     \
     fetch       [list action_target         [ACTION_ARGS_PORTS]] \