From 20b5ff24fd183d0154b67fa5757bb6177908f2b4 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Sat, 6 Sep 2008 01:53:49 +0000
Subject: [PATCH] add more legal characters into the safe i18n key regexp

---
 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 d9dfe7fb1..9b23a7c26 100644
--- a/lib/WebGUI/International.pm
+++ b/lib/WebGUI/International.pm
@@ -93,7 +93,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) = @_;