[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;