From 132a48312aabd34463e3432f1172ceb0f29faf5e Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Fri, 2 Jan 2009 06:46:17 +0000
Subject: [PATCH] Add more characters that are legal in i18n keys.

---
 lib/WebGUI/International.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/WebGUI/International.pm b/lib/WebGUI/International.pm
index 03c34367a..8d3668d33 100644
--- a/lib/WebGUI/International.pm
+++ b/lib/WebGUI/International.pm
@@ -86,7 +86,7 @@ A string that specifies the language that the user should see.  Defaults to the
 
 =cut
 
-my $safeRe = qr/[^\.:\w\d\s\/\^\;\?%><]/;
+my $safeRe = qr/[^\.:\w\d\s\/\^\;\?%><\]\[]/;
 
 sub get {
 	my ($self, $id, $namespace, $language) = @_;