--- loncom/homework/caparesponse/caparesponse.pm 2003/02/27 22:20:40 1.80
+++ loncom/homework/caparesponse/caparesponse.pm 2003/03/13 16:24:13 1.83
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# caparesponse definition
#
-# $Id: caparesponse.pm,v 1.80 2003/02/27 22:20:40 albertel Exp $
+# $Id: caparesponse.pm,v 1.83 2003/03/13 16:24:13 sakharuk Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -262,6 +262,9 @@ sub end_numericalresponse {
$result.= '
Formula have to be entered here!
';
}
} elsif ($target eq 'tex') {
+ if (defined $unit and $Apache::lonhomework::type eq 'exam') {
+ $result.=' \textit{(in} \verb|'.$unit.'|\textit{)} ';
+ }
if ($$tagstack[-1] eq 'numericalresponse') {
my $max_val = 0;
if ($formats[0]=~m/^(\d+)E([^\d]*)(\d*)$/) {