--- loncom/interface/lontrackstudent.pm 2009/03/26 16:30:58 1.27
+++ loncom/interface/lontrackstudent.pm 2009/08/28 22:47:07 1.30
@@ -1,6 +1,6 @@
# The LearningOnline Network with CAPA
#
-# $Id: lontrackstudent.pm,v 1.27 2009/03/26 16:30:58 bisitz Exp $
+# $Id: lontrackstudent.pm,v 1.30 2009/08/28 22:47:07 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -119,14 +119,16 @@ sub get_data {
$text = 'View more activity by this student';
$inc = $num_records;
$r->print(&Apache::loncommon::track_student_link($text,$sname,$sdom,undef,
- ($env{'form.start'}+$inc)
+ ($env{'form.start'}+$inc),
+ $env{'form.only_body'}
));
$r->print('
');
}
$r->print('
');
$text = 'Resubmit last request to check for newer data';
$r->print(&Apache::loncommon::track_student_link($text,$sname,$sdom,undef,
- $env{'form.start'}));
+ $env{'form.start'},
+ $env{'form.only_body'}));
&Apache::lonhtmlcommon::Update_PrgWin($r,$prog_state,&mt('Finished!'));
return;
@@ -554,7 +556,7 @@ sub handler {
#
# Extract form elements from query string
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},
- ['selected_student','start']);
+ ['selected_student','start','only_body']);
#
# We will almost always need this...
my $navmap = Apache::lonnavmaps::navmap->new();
@@ -572,7 +574,11 @@ sub handler {
bug=>'instructor interface'});
#
# Give the LON-CAPA page header
- $r->print(&Apache::loncommon::start_page('Student Activity',&styles()).
+ my $args;
+ if ($env{'form.only_body'}) {
+ $args = { only_body => 1, };
+ }
+ $r->print(&Apache::loncommon::start_page('Student Activity',&styles(),$args).
&Apache::lonhtmlcommon::breadcrumbs('Student Activity'));
$r->rflush();
#
@@ -580,8 +586,8 @@ sub handler {
$r->print('