[LON-CAPA-cvs] cvs: loncom(version_2_10_X) /homework structuretags.pm

[raeburn]

raeburn		Thu Jan  6 23:06:29 2011 EDT

  Modified files:              (Branch: version_2_10_X)
    /loncom/homework	structuretags.pm 
  Log:
  - Backport 1.476, 1.477.
  
  
Index: loncom/homework/structuretags.pm
diff -u loncom/homework/structuretags.pm:1.465.2.10 loncom/homework/structuretags.pm:1.465.2.11
--- loncom/homework/structuretags.pm:1.465.2.10	Sat Jan  1 21:54:08 2011
+++ loncom/homework/structuretags.pm	Thu Jan  6 23:06:29 2011
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # definition of tags that give a structure to a document
 #
-# $Id: structuretags.pm,v 1.465.2.10 2011/01/01 21:54:08 raeburn Exp $
+# $Id: structuretags.pm,v 1.465.2.11 2011/01/06 23:06:29 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -895,6 +895,7 @@
 	&Apache::lonhomework::reset_show_problem_status();
 	$Apache::lonhomework::ignore_response_errors=1;
     }
+    @Apache::functionplotresponse::callscripts=();
     @Apache::inputtags::responselist = ();
     @Apache::inputtags::importlist = ();
     @Apache::inputtags::previous=();
@@ -922,6 +923,7 @@
     undef($Apache::lonhomework::type);
     undef($Apache::lonhomework::scantronmode);
     undef($Apache::lonhomework::ignore_response_errors);
+    undef(@Apache::functionplotresponse::callscripts);
     &Apache::lonhomework::reset_show_problem_status();
 }
 
@@ -1340,6 +1342,9 @@
 		}
 	    }
 	}
+        if ($target eq 'web') {
+           $result.=&Apache::functionplotresponse::init_script();
+        }
 	if ($target eq 'grade') {
 	    &Apache::lonhomework::showhash(%Apache::lonhomework::results);
 	    &finalize_storage();