--- loncom/interface/lontrackstudent.pm 2004/08/29 19:58:32 1.6 +++ loncom/interface/lontrackstudent.pm 2004/12/13 21:08:09 1.9 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lontrackstudent.pm,v 1.6 2004/08/29 19:58:32 matthew Exp $ +# $Id: lontrackstudent.pm,v 1.9 2004/12/13 21:08:09 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -56,6 +56,8 @@ sub get_data { ($r,$prog_state,&mt('Composing Query')); # my $query = &build_query($mode); + # Allow the other server to begin processing the data before we ask for it. + sleep(5); &Apache::lonnet::logthis('sending query '.$query); ## ## Send it along @@ -328,6 +330,7 @@ sub developer_centric_styles { tr.warning { background-color: red; } tr.chat { background-color: yellow; } tr.chatfetch { background-color: yellow; } + tr.evaluate { background-color: red; } tr.navmaps { background-color: \#777777; } tr.roles { background-color: \#999999; } tr.flip { background-color: \#BBBBBB; } @@ -425,6 +428,10 @@ sub handler { $r->print('

'. &mt('Recent activity of [_1]@[_2]',$sname,$sdom). '

'); + $r->print('

'.&mt(<'); +Compiling student activity data can take a long time. +It may be necessary to reload this page to get the most current information. +END &get_data($r,\%prog_state,$navmap, 'student:'.$ENV{'form.selected_student'}); } else {