--- loncom/homework/functionplotresponse.pm 2011/01/25 20:52:08 1.51 +++ loncom/homework/functionplotresponse.pm 2011/01/26 20:20:50 1.52 @@ -1,7 +1,7 @@ # LearningOnline Network with CAPA # option list style responses # -# $Id: functionplotresponse.pm,v 1.51 2011/01/25 20:52:08 www Exp $ +# $Id: functionplotresponse.pm,v 1.52 2011/01/26 20:20:50 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -108,7 +108,7 @@ sub init_script { $script.="if (param=='applet_$id') { loaded_$id=true; }\n"; } $script.="if (".join(' && ',map { "loaded_$_" } (@Apache::functionplotresponse::callscripts)). - ") { setTimeout('ggbInitAll()',20) }"; + ") { setTimeout('ggbInitAll()',200) }"; my $calls=join("\n",map { "ggbInit_$_();" } (@Apache::functionplotresponse::callscripts)); return (<