add more legal characters into the safe i18n key regexp

This commit is contained in:
Colin Kuskie 2008-09-06 01:53:49 +00:00
parent 33109c66eb
commit 20b5ff24fd

View file

@ -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) = @_;