From a6018f798c5ae6f5962615cc8e31b78829ad0e5b Mon Sep 17 00:00:00 2001
From: Graham Knop <graham@plainblack.com>
Date: Thu, 30 Aug 2007 00:15:27 +0000
Subject: [PATCH] fix quote tests

---
 t/HTML.t                | 2 +-
 t/Macro/c_companyName.t | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/t/HTML.t b/t/HTML.t
index a1b143ae6..bdc380d43 100644
--- a/t/HTML.t
+++ b/t/HTML.t
@@ -91,7 +91,7 @@ my @macroParamSets = (
 	},
 	{
 		inputText => q|'|,
-		output => q|&quot;|,
+		output => q|&#39;|,
 		comment => 'single quote',
 	},
 );
diff --git a/t/Macro/c_companyName.t b/t/Macro/c_companyName.t
index 51ed82d75..3367287ce 100644
--- a/t/Macro/c_companyName.t
+++ b/t/Macro/c_companyName.t
@@ -38,7 +38,7 @@ is($output, $originalCompanyName, "Testing companyName");
 
 $session->setting->set('companyName', q|Gooey's Consulting, LLC|);
 $output = WebGUI::Macro::c_companyName::process($session);
-is($output, q|Gooey&quot;s Consulting&#44; LLC|, "Testing companyName with embedded quote and comma");
+is($output, q|Gooey&#39;s Consulting&#44; LLC|, "Testing companyName with embedded quote and comma");
 
 }