version 1.249, 2024/06/19 05:56:22
|
version 1.250, 2024/10/29 03:22:10
|
Line 885 sub answer_part {
|
Line 885 sub answer_part {
|
if ($env{'form.answer_output_mode'} eq 'tex') { |
if ($env{'form.answer_output_mode'} eq 'tex') { |
if (!$args->{'no_verbatim'}) { |
if (!$args->{'no_verbatim'}) { |
my $to_use='|'; |
my $to_use='|'; |
foreach my $value (32..126) { |
foreach my $value (33..41,43..126) { |
my $char=pack('c',$value); |
my $char=pack('c',$value); |
if ($answer !~ /\Q$char\E/) { |
if ($answer !~ /\Q$char\E/) { |
$to_use=$char; |
$to_use=$char; |