--- loncom/interface/lonaboutme.pm 2009/02/12 21:15:47 1.92 +++ loncom/interface/lonaboutme.pm 2009/05/11 14:13:51 1.129 @@ -1,7 +1,7 @@ # The LearningOnline Network -# "About Me" Personal Information +# Personal Information Page # -# $Id: lonaboutme.pm,v 1.92 2009/02/12 21:15:47 schafran Exp $ +# $Id: lonaboutme.pm,v 1.129 2009/05/11 14:13:51 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -118,13 +118,13 @@ sub handler { } if (!$candisplay) { if ($target eq 'tex') { - $r->print('\noindent{\large\textbf{'.&mt('No user home page available').'}}\\\\\\\\'); + $r->print('\noindent{\large\textbf{'.&mt('No user personal information page available').'}}\\\\\\\\'); } else { - $r->print(&Apache::loncommon::start_page("Personal Information")); - $r->print('
'.&mt('Privacy Note').': '. - &mt('The information you submit can be viewed by anybody who is logged into LON-CAPA. Do not provide information that you are not ready to share publicly.'). - '
'.&mt('Show Public View').''. - &Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView').'
'. - &Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes',&mt('Help with filling in text boxes')).''); - } elsif ($privleged && $target ne 'tex') { - $query_string = &build_query_string({'forceedit' => '1','popup' => $env{'form.popup'}}); - $r->print(''); - } + + my $query_string; + if (($env{'form.uploaddoc.filename'}) && ($env{'form.storeupl'}) && ($allowed)) { if ($env{'form.uploaddoc.filename'}=~/\.(gif|jpg|png|jpeg)$/i) { @@ -275,29 +328,25 @@ sub handler { &Apache::lonnet::put('aboutme',\%syllabus,$cdom,$cnum); } -my $lastmod; -my $image; +my $image; # ---------------------------------------------------------------- Get syllabus if (($syllabus{'uploaded.lastmodified'}) || ($allowed)) { - $lastmod=$syllabus{'uploaded.lastmodified'}; - $lastmod=($lastmod?&Apache::lonlocal::locallocaltime($lastmod):&mt('never')); - $r->print(''); } if($allowed) { $r->print('
'.&mt('Close window').''); } @@ -394,8 +429,8 @@ my $image; $r->print('\end{document}'); } - - + + return OK; } @@ -444,14 +479,14 @@ sub print_portfiles_link { my $query_string = &build_query_string(); my $output; my %lt = &Apache::lonlocal::texthash( - vpfi => 'Viewable portfolio files', - vgpf => 'Viewable group portfolio files', - difl => 'Display file listing', - ); + 'vpfi' => 'Viewable portfolio files', + 'vgpf' => 'Viewable group portfolio files', + 'difl' => 'Display file listing', + ); if ($filecounts->{'both'} > 0) { $output = '