--- loncom/homework/structuretags.pm 2010/08/08 02:00:50 1.474
+++ loncom/homework/structuretags.pm 2010/10/28 00:27:56 1.477
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# definition of tags that give a structure to a document
#
-# $Id: structuretags.pm,v 1.474 2010/08/08 02:00:50 raeburn Exp $
+# $Id: structuretags.pm,v 1.477 2010/10/28 00:27:56 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -783,6 +783,7 @@ sub init_problem_globals {
&Apache::lonhomework::reset_show_problem_status();
$Apache::lonhomework::ignore_response_errors=1;
}
+ @Apache::functionplotresponse::callscripts=();
@Apache::inputtags::responselist = ();
@Apache::inputtags::importlist = ();
@Apache::inputtags::previous=();
@@ -810,6 +811,7 @@ sub reset_problem_globals {
undef($Apache::lonhomework::type);
undef($Apache::lonhomework::scantronmode);
undef($Apache::lonhomework::ignore_response_errors);
+ undef(@Apache::functionplotresponse::callscripts);
&Apache::lonhomework::reset_show_problem_status();
}
@@ -1202,6 +1204,9 @@ sub end_problem {
}
}
}
+ if ($target eq 'web') {
+ $result.=&Apache::functionplotresponse::init_script();
+ }
if ($target eq 'grade') {
&Apache::lonhomework::showhash(%Apache::lonhomework::results);
&finalize_storage();
@@ -1835,7 +1840,7 @@ sub start_part {
}
} elsif ($target eq 'web') {
- $result.='';
+ $result.='';
}
}
}