[110126] branches/gsoc13-tests/src/macports1.0/tests/test.tcl

[marius at macports.org]

Revision: 110126
          https://trac.macports.org/changeset/110126
Author:   marius at macports.org
Date:     2013-08-26 12:55:20 -0700 (Mon, 26 Aug 2013)
Log Message:
-----------
macports1.0: fixed output in case of error and skipped tests

Modified Paths:
--------------
    branches/gsoc13-tests/src/macports1.0/tests/test.tcl

Modified: branches/gsoc13-tests/src/macports1.0/tests/test.tcl
===================================================================
--- branches/gsoc13-tests/src/macports1.0/tests/test.tcl	2013-08-26 19:11:07 UTC (rev 110125)
+++ branches/gsoc13-tests/src/macports1.0/tests/test.tcl	2013-08-26 19:55:20 UTC (rev 110126)
@@ -84,8 +84,8 @@
 	set lastline [lindex [split $result "\n"] end]
 
 	if {[lrange [split $lastline "\t"] 1 1] != "Total"} {
-	    set lastline [lindex [split $result "\n"] 0]
-	    set errmsg [lindex [split $result "\n"] 2]
+	    set lastline [lindex [split $result "\n"] end-2]
+	    set errmsg [lindex [split $result "\n"] end]
 	}
 
 	set splitresult [split $lastline "\t"]
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20130826/b1cd2111/attachment.html>