[63269] trunk/base/src/port/port.tcl

[raimue at macports.org]

Revision: 63269
          http://trac.macports.org/changeset/63269
Author:   raimue at macports.org
Date:     2010-01-30 20:11:06 -0800 (Sat, 30 Jan 2010)
Log Message:
-----------
port/port.tcl: Check for errors when opening log file

Modified Paths:
--------------
    trunk/base/src/port/port.tcl

Modified: trunk/base/src/port/port.tcl
===================================================================
--- trunk/base/src/port/port.tcl	2010-01-31 04:06:08 UTC (rev 63268)
+++ trunk/base/src/port/port.tcl	2010-01-31 04:11:06 UTC (rev 63269)
@@ -1473,7 +1473,9 @@
         set portpath [macports::getportdir $porturl]
         set logfile [file join [macports::getportlogpath $portpath] "main.log"]
         if {[file exists $logfile]} {
-            set fp [open $logfile r]
+            if {[catch {set fp [open $logfile r]} result} {
+                break_softcontinue "Could not open file $logfile: $result" 1 status
+            }
             set data [read $fp]
             set data [split $data "\n"]
 
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20100130/6a4c6454/attachment.html>