version 1.137, 2009/06/08 18:04:45
|
version 1.138, 2009/06/11 16:48:33
|
Line 203 sub handler {
|
Line 203 sub handler {
|
($env{'user.domain'} eq $cdom)); |
($env{'user.domain'} eq $cdom)); |
if ($forcestudent or $target eq 'tex') { $allowed=0; } |
if ($forcestudent or $target eq 'tex') { $allowed=0; } |
|
|
|
|
# --------------------------------------- There is such a user, get environment |
# --------------------------------------- There is such a user, get environment |
|
|
if ($target ne 'tex') { |
if ($target ne 'tex') { |
Line 218 sub handler {
|
Line 217 sub handler {
|
} |
} |
my $start_page = &Apache::loncommon::start_page('Personal Information Page',$rss_link,$args); |
my $start_page = &Apache::loncommon::start_page('Personal Information Page',$rss_link,$args); |
$r->print($start_page); |
$r->print($start_page); |
|
} |
|
|
|
#----------------Print Functions |
|
if ($target ne 'tex') { |
|
my $functions=&Apache::lonhtmlcommon::start_funclist(); |
|
if ($allowed) { |
|
my $query_string = &build_query_string( |
|
{'forcestudent' => '1', |
|
'popup' => $env{'form.popup'}}); |
|
$functions.=&Apache::lonhtmlcommon::add_item_funclist( |
|
'<a href="'.$r->uri.$query_string.'">' |
|
.&mt('Show Public View').'</a>' |
|
.&Apache::loncommon::help_open_topic( |
|
'Uploaded_Templates_PublicView')); |
|
} elsif ($privleged) { |
|
my $query_string = &build_query_string( |
|
{'forceedit' => '1', |
|
'popup' => $env{'form.popup'}}); |
|
$functions.=&Apache::lonhtmlcommon::add_item_funclist( |
|
'<a href="'.$r->uri.$query_string.'">' |
|
.&mt('Edit').'</a>'); |
|
} |
|
$functions.=&Apache::lonhtmlcommon::add_item_funclist( |
|
&Apache::lontemplate::send_message($r,$cnum,$cdom)); |
|
|
|
if ($env{'request.course.id'} && |
|
&Apache::lonnet::allowed('srm',$env{'request.course.id'}) && |
|
&in_course($cdom,$cnum)) { |
|
if (&Apache::lonnet::allowed('vsa', $env{'request.course.id'}) || |
|
&Apache::lonnet::allowed('vsa', $env{'request.course.id'}.'/'.$env{'request.course.sec'})) { |
|
$functions.=&Apache::lonhtmlcommon::add_item_funclist( |
|
&Apache::loncommon::track_student_link( |
|
'View recent activity by this student',$cnum,$cdom)); |
|
} |
|
if (&Apache::lonnet::allowed('vgr', $env{'request.course.id'}) || |
|
&Apache::lonnet::allowed('vgr', $env{'request.course.id'}.'/'.$env{'request.course.sec'})) { |
|
$functions.=&Apache::lonhtmlcommon::add_item_funclist( |
|
&Apache::loncommon::slot_reservations_link( |
|
'Slot reservation history',$cnum,$cdom)); |
|
} |
|
$functions.=&Apache::lonhtmlcommon::add_item_funclist( |
|
&Apache::loncommon::noteswrapper( |
|
&mt('Add Records'),$cnum,$cdom)); |
|
} |
|
$functions.=&Apache::lonhtmlcommon::end_funclist(); |
|
$r->print(&Apache::loncommon::head_subbox($functions)); |
|
} |
|
|
|
# Print Privacy Note |
|
if ($target ne 'tex') { |
#Print Privacy Note |
#Print Privacy Note |
if ($allowed) { |
if ($allowed) { |
$r->print('<div class="LC_info">' |
$r->print('<div class="LC_info">' |
Line 227 sub handler {
|
Line 275 sub handler {
|
.'</div>' |
.'</div>' |
); |
); |
} |
} |
|
} |
|
|
#Print last modified |
#Print last modified |
|
|
|
if ($target ne 'tex') { |
my $lastmod; |
my $lastmod; |
if (($syllabus{'uploaded.lastmodified'}) || ($allowed)) { |
if (($syllabus{'uploaded.lastmodified'}) || ($allowed)) { |
$lastmod=$syllabus{'uploaded.lastmodified'}; |
$lastmod=$syllabus{'uploaded.lastmodified'}; |
Line 246 sub handler {
|
Line 296 sub handler {
|
} |
} |
} |
} |
|
|
#----------------Print Functions |
|
if ($target ne 'tex') { |
|
$r->print(&Apache::lontemplate::start_functionslist()); |
|
if ($allowed) { |
|
my $query_string = &build_query_string({'forcestudent' => '1','popup' => $env{'form.popup'}}); |
|
$r->print(&Apache::lontemplate::item_functionslist( |
|
'<a href="'.$r->uri.$query_string.'">'.&mt('Show Public View').'</a>' |
|
.&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView'))); |
|
} elsif ($privleged) { |
|
my $query_string = &build_query_string({'forceedit' => '1','popup' => $env{'form.popup'}}); |
|
$r->print(&Apache::lontemplate::item_functionslist( |
|
'<a href="'.$r->uri.$query_string.'">'. &mt('Edit').'</a>')); |
|
} |
|
$r->print(&Apache::lontemplate::item_functionslist( |
|
&Apache::lontemplate::send_message($r,$cnum,$cdom))); |
|
|
|
if ($env{'request.course.id'} && &Apache::lonnet::allowed('srm',$env{'request.course.id'}) && &in_course($cdom,$cnum)) { |
|
if (&Apache::lonnet::allowed('vsa', $env{'request.course.id'}) || &Apache::lonnet::allowed('vsa', $env{'request.course.id'}.'/'.$env{'request.course.sec'})) { |
|
$r->print(&Apache::lontemplate::item_functionslist( |
|
&Apache::loncommon::track_student_link('View recent activity by this student',$cnum,$cdom))); |
|
} |
|
if (&Apache::lonnet::allowed('vgr', $env{'request.course.id'}) || |
|
&Apache::lonnet::allowed('vgr', $env{'request.course.id'}.'/'.$env{'request.course.sec'})) { |
|
$r->print(&Apache::lontemplate::item_functionslist( |
|
&Apache::loncommon::slot_reservations_link('Slot reservation history',$cnum,$cdom))); |
|
} |
|
$r->print(&Apache::lontemplate::item_functionslist( |
|
&Apache::loncommon::noteswrapper(&mt('Add Records'),$cnum,$cdom))); |
|
} |
|
$r->print(&Apache::lontemplate::end_functionslist()); |
|
} |
|
#------Print Headtitle |
#------Print Headtitle |
if ($target ne 'tex') { |
if ($target ne 'tex') { |
$r->print('<div class="LC_Box">'); |
$r->print('<div class="LC_Box">'); |