From d4ddb3cf109ed11eb4f01f7a5d8e0f17fd722c6a Mon Sep 17 00:00:00 2001
From: das <das>
Date: Sun, 30 Aug 2009 19:18:39 +0000
Subject: add "error:" to -verbose line test failure output to satisfy stricter
 log parsers like Xcode 3.2

---
 library/tcltest/tcltest.tcl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/library/tcltest/tcltest.tcl b/library/tcltest/tcltest.tcl
index f363c80..64a9c08 100644
--- a/library/tcltest/tcltest.tcl
+++ b/library/tcltest/tcltest.tcl
@@ -16,7 +16,7 @@
 # Contributions from Don Porter, NIST, 2002.  (not subject to US copyright)
 # All rights reserved.
 #
-# RCS: @(#) $Id: tcltest.tcl,v 1.104 2009/04/08 16:05:15 dgp Exp $
+# RCS: @(#) $Id: tcltest.tcl,v 1.105 2009/08/30 19:18:39 das Exp $
 
 package require Tcl 8.5		;# -verbose line uses [info frame]
 namespace eval tcltest {
@@ -2104,7 +2104,7 @@ proc tcltest::test {name description args} {
 	    }
 	}
 	if {[info exists testLine]} {
-	    puts [outputChannel] "$testFile:$testLine: test failed:\
+	    puts [outputChannel] "$testFile:$testLine: error: test failed:\
 		    $name [string trim $description]"
 	}
     }	
-- 
cgit v0.12