--- trunk/webwork2/lib/WeBWorK/PG.pm	2003/05/28 03:31:28	927
+++ trunk/webwork2/lib/WeBWorK/PG.pm	2003/06/09 17:59:16	1081
@@ -357,7 +357,7 @@
 	# replace ^ with **    (for exponentiation)
 	# $answer =~ s/\^/**/g;
 	# Return if forbidden characters are found
-	unless ($answer =~ /^[a-zA-Z0-9_\-\+ \t\/@%\*\.\n^\(\)]+$/ )  {
+	unless ($answer =~ /^[a-zA-Z0-9_\-\+ \t\/@%\*\.\n^\[\]\(\)\,\|]+$/ )  {
 		$answer =~ tr/a-zA-Z0-9_\-\+ \t\/@%\*\.\n^\(\)/#/c;
 		$errorno = "<BR>There are forbidden characters in your answer: $submittedAnswer<BR>";
 		return ($answer,$errorno);