[LON-CAPA-cvs] cvs: loncom /homework/caparesponse caparesponse.pm
albertel
lon-capa-cvs-allow@mail.lon-capa.org
Wed, 29 Aug 2007 21:57:47 -0000
albertel Wed Aug 29 17:57:47 2007 EDT
Modified files:
/loncom/homework/caparesponse caparesponse.pm
Log:
- BUG#5398 - course 'turn off all sig figs' was being honored in CSTR it
shouldn't
Index: loncom/homework/caparesponse/caparesponse.pm
diff -u loncom/homework/caparesponse/caparesponse.pm:1.218 loncom/homework/caparesponse/caparesponse.pm:1.219
--- loncom/homework/caparesponse/caparesponse.pm:1.218 Wed Aug 29 17:55:37 2007
+++ loncom/homework/caparesponse/caparesponse.pm Wed Aug 29 17:57:47 2007
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# caparesponse definition
#
-# $Id: caparesponse.pm,v 1.218 2007/08/29 21:55:37 albertel Exp $
+# $Id: caparesponse.pm,v 1.219 2007/08/29 21:57:47 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1010,7 +1010,8 @@
my ($sig)=@_;
#&Apache::lonxml::debug("Got a sig of :$sig:");
my $courseid=$env{'request.course.id'};
- if (lc($env{"course.$courseid.disablesigfigs"}) eq 'yes') {
+ if ($env{'request.state'} ne 'construct'
+ && lc($env{"course.$courseid.disablesigfigs"}) eq 'yes') {
return (15,0);
}
my $sig_lbound;