--- trunk/pg/lib/AnswerHash.pm	2003/09/25 05:42:31	1534
+++ trunk/pg/lib/AnswerHash.pm	2003/09/26 21:16:18	1535
@@ -485,9 +485,10 @@
 }
 	
 sub get_student_answer {
-	my $self    = shift;
-	my $input   = shift;	
-	my %answer_options             = @_;
+	my $self           = shift;
+	my $input          = shift;	
+	my %answer_options = @_;
+	warn "Raw student answer is |$input|" if $self->{debug};
 	$input = '' unless defined($input); 
 	if (ref($input) =~/AnswerHash/) {
 		# in this case nothing needs to be done, since the student's answer is already in an answerhash.