--- loncom/homework/structuretags.pm 2010/12/19 21:12:20 1.480 +++ loncom/homework/structuretags.pm 2010/12/31 02:40:14 1.483 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.480 2010/12/19 21:12:20 raeburn Exp $ +# $Id: structuretags.pm,v 1.483 2010/12/31 02:40:14 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -128,6 +128,7 @@ sub homework_js { &setmode_javascript(). <<'JS'; JS } @@ -167,35 +168,40 @@ sub file_delchk_js { &mt('Submit Answer?'); return <<"ENDSCRIPT"; ENDSCRIPT } @@ -798,12 +804,12 @@ sub store_aggregates { $cdomain,$cname); } if (keys(%anoncounter) > 0) { - &Apache::lonnet::cinc('nohist_anonsurveys',\%anoncounter, - $cdomain,$cname); + &Apache::lonnet::cput('nohist_anonsurveys',\%anoncounter, + $cdomain,$cname); } if (keys(%randtrycounter) > 0) { - &Apache::lonnet::cinc('nohist_randomizetry',\%randtrycounter, - $cdomain,$cname); + &Apache::lonnet::cput('nohist_randomizetry',\%randtrycounter, + $cdomain,$cname); } }