--- loncom/homework/caparesponse/caparesponse.pm 2004/06/04 22:06:07 1.146 +++ loncom/homework/caparesponse/caparesponse.pm 2004/06/10 21:19:59 1.148 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # caparesponse definition # -# $Id: caparesponse.pm,v 1.146 2004/06/04 22:06:07 albertel Exp $ +# $Id: caparesponse.pm,v 1.148 2004/06/10 21:19:59 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -115,7 +115,7 @@ sub start_numericalresponse { } chop $answertxt; if ($target eq 'web') { - $answertxt.=" $unit.
"; + $answertxt.=" $unit "; } $Apache::inputtags::answertxt{$id}=$answertxt; } @@ -517,6 +517,10 @@ sub get_tolrange { sub get_sigrange { my ($sig)=@_; &Apache::lonxml::debug("Got a sig of :$sig:"); + my $courseid=$ENV{'request.course.id'}; + if (lc($ENV{"course.$courseid.disablesigfigs"}) eq 'yes') { + return (15,0); + } my $sig_lbound; my $sig_ubound; if ($sig eq '') {