From efea7c96859e8ff04faf76f1e3758c451c3a1064 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Wed, 6 Jun 2007 23:40:14 +0000
Subject: [PATCH] fix a typo in the AssetMetaData, and add code to WebGUI::Test
 to force all output onto STDOUT.  Step 1 to smolder

---
 t/Asset/AssetMetaData.t | 2 +-
 t/lib/WebGUI/Test.pm    | 7 +++++++
 2 files changed, 8 insertions(+), 1 deletion(-)

diff --git a/t/Asset/AssetMetaData.t b/t/Asset/AssetMetaData.t
index e6d710d11..c246b91cb 100644
--- a/t/Asset/AssetMetaData.t
+++ b/t/Asset/AssetMetaData.t
@@ -71,7 +71,7 @@ $folder->addMetaDataField('new', 'color', '', 'Favorite Color', 'radioList', "Bl
 
 @snipKeys = keys %{ $snippet->getMetaDataFields };
 @foldKeys = keys %{ $folder->getMetaDataFields };
-is(scalar @foldKeys, 2, 'Two meta data field available');
+is(scalar @foldKeys, 2, 'Two meta data fields available');
 cmp_deeply( \@snipKeys, \@foldKeys, 'Snippet and Folder have access to the same meta data fields');
 
 END {
diff --git a/t/lib/WebGUI/Test.pm b/t/lib/WebGUI/Test.pm
index 2a66f8e05..460c13873 100644
--- a/t/lib/WebGUI/Test.pm
+++ b/t/lib/WebGUI/Test.pm
@@ -10,6 +10,13 @@ use IO::Handle qw[];
 use File::Spec qw[];
 use Test::MockObject::Extends;
 
+##Hack to get ALL test output onto STDOUT.
+use Test::Builder;
+sub import {
+    no warnings;
+    *Test::Builder::failure_output = sub { return \*STDOUT };
+}
+
 our $logger_warns;
 our $logger_debug;
 our $logger_info;