Skip to content

Commit ab41355

Browse files
Alex-Jordandrgrice1
authored andcommitted
don't remove excess whitespace from student answers
1 parent 5b19c59 commit ab41355

File tree

1 file changed

+2
-3
lines changed

1 file changed

+2
-3
lines changed

macros/core/PGbasicmacros.pl

Lines changed: 2 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -301,14 +301,13 @@ sub NAMED_ANS_RULE {
301301
$rh_sticky_answers->{$name} = \@answers; # Store the rest.
302302
}
303303

304-
$answer_value =~ s/\s+/ /g; # Remove excessive whitespace from student answer.
305304
$name = RECORD_ANS_NAME($name, $answer_value);
306305
my $previous_name = "previous_$name";
307306
$name = ($envir{use_opaque_prefix}) ? "%%IDPREFIX%%$name" : $name;
308307
$previous_name = ($envir{use_opaque_prefix}) ? "%%IDPREFIX%%$previous_name" : $previous_name;
309308

310-
my $tcol = $col / 2 > 3 ? $col / 2 : 3; # get max
311-
$tcol = $tcol < 40 ? $tcol : 40; # get min
309+
my $tcol = $col / 2 > 3 ? $col / 2 : 3; # get max
310+
$tcol = $tcol < 40 ? $tcol : 40; # get min
312311

313312
return MODES(
314313
TeX => "{\\answerRule[$name]{$tcol}}",

0 commit comments

Comments
 (0)