From 9988f6a116d88c97ecf1f32b3c09f258f8c030a4 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Sat, 21 Feb 2009 22:19:46 +0000
Subject: [PATCH] Add a check for keys with spaces.

---
 t/International.t                 | 10 ++++++++++
 t/supporting_collateral/WebGUI.pm |  5 +++++
 2 files changed, 15 insertions(+)

diff --git a/t/International.t b/t/International.t
index 9e7654960..0346c244c 100644
--- a/t/International.t
+++ b/t/International.t
@@ -76,6 +76,16 @@ SKIP: {
 		undef,
 		'Language check: key from non-existant file returns an empty string'
 	);
+	is(
+		$i18n->get('key with spaces in it','WebGUI','PigLatin'),
+		'Key Contained Spaces',
+		'keys with spaces work'
+	);
+	is(
+		$i18n->get('template url_addAlbum','Asset_Gallery'),
+		'Key Contained Spaces',
+		'keys with spaces work'
+	);
 
 }
 
diff --git a/t/supporting_collateral/WebGUI.pm b/t/supporting_collateral/WebGUI.pm
index a035cf3ad..a264cd578 100644
--- a/t/supporting_collateral/WebGUI.pm
+++ b/t/supporting_collateral/WebGUI.pm
@@ -6,6 +6,11 @@ our $I18N = {
 		lastUpdated => 1141963573,
 		context => q|Test key for International macro test.  DO NOT TRANSLATE|,
 	},
+
+    'key with spaces in it' => {
+        message     => q|Key Contained Spaces|,
+        lastUpdated => 0,
+    }
 };
 
 1;