--- loncom/interface/lonaboutme.pm 2004/07/27 23:35:34 1.29 +++ loncom/interface/lonaboutme.pm 2004/08/26 21:42:40 1.31 @@ -1,7 +1,7 @@ # The LearningOnline Network # "About Me" Personal Information # -# $Id: lonaboutme.pm,v 1.29 2004/07/27 23:35:34 www Exp $ +# $Id: lonaboutme.pm,v 1.31 2004/08/26 21:42:40 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -202,15 +202,25 @@ ENDDOCUMENT } if ($ENV{'request.course.id'}) { if (&Apache::lonnet::allowed('srm',$ENV{'request.course.id'})) { - $r->print(''); if ($target ne 'tex') { + $r->print(''); $r->print('

'. &mt('User Notes, Records of Face-To-Face Discussions, and Critical Messages in Course').'

'. &mt('Shared by course faculty and staff'). &Apache::loncommon::help_open_topic("Course_Face_To_Face_Records,Course_Critical_Message"). '
'); - &Apache::lonmsg::disfacetoface($r,$cnum,$cdom); - $r->print(&Apache::loncommon::noteswrapper('Add Records',$cnum,$cdom)); + &Apache::lonmsg::disfacetoface($r,$cnum,$cdom); + $r->print('
'); + if (&Apache::lonnet::allowed('vsa', + $ENV{'request.course.id'}) || + &Apache::lonnet::allowed('vsa', + $ENV{'request.course.id'}.'/'. + $ENV{'request.course.sec'})) { + $r->print(&Apache::loncommon::track_student_link + ('View recent activity by this student', + $cnum,$cdom).(' 'x2)); + } + $r->print(&Apache::loncommon::noteswrapper('Add Records',$cnum,$cdom)); } else { $r->print('\\\\\textbf{'.&mt('User Notes, Records of Face-To-Face Discussions, and Critical Messages in Course').'}\\\\'.&mt('Shared by course faculty and staff').'\\\\\\\\'); &Apache::lonmsg::disfacetoface($r,$cnum,$cdom);