--- loncom/interface/lonaboutme.pm 2003/09/21 21:40:06 1.17
+++ loncom/interface/lonaboutme.pm 2004/05/12 19:00:20 1.26
@@ -1,7 +1,7 @@
# The LearningOnline Network
# "About Me" Personal Information
#
-# $Id: lonaboutme.pm,v 1.17 2003/09/21 21:40:06 www Exp $
+# $Id: lonaboutme.pm,v 1.26 2004/05/12 19:00:20 sakharuk Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -41,13 +41,17 @@ sub handler {
&Apache::loncommon::content_type($r,'text/html');
$r->send_http_header;
return OK if $r->header_only;
-
+ my $target=$ENV{'form.grade_target'};
# ------------------------------------------------------------ Print the screen
- $r->print(< '.&Apache::loncommon::messagewrapper('Send me a message',$cnum,$cdom).
- ' '.&Apache::loncommon::messagewrapper('Send me a message',$cnum,$cdom).' '.&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.').
-''.&Apache::loncommon::plainname($cnum,$cdom).'
');
+ $r->print(''.&Apache::loncommon::plainname($cnum,$cdom).'
');
+ } else {
+ $r->print('\noindent{\large\textbf{'.&Apache::loncommon::plainname($cnum,$cdom).'}}\\\\\\\\');
+ }
if ($courseenv{'nickname'}) {
$r->print(
'"'.$courseenv{'nickname'}.
'"
');
}
- $r->print(''.$Apache::lonnet::domaindescription{$cdom}.'
'.
- ''.$Apache::lonnet::domaindescription{$cdom}.'
'.
+ '
Show Public View'. - &Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView').'
'); + if ($target ne 'tex') { + $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.'). + '
'. + &Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes','Help with filling in text boxes').'Show Public View'. + &Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView').'
'); + } else { + $r->print(' \textbf{'.&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.').'\\\\\\\\'); + } } if (($ENV{'form.uploaddoc.filename'}) && ($ENV{'form.storeupl'}) && ($allowed)) { if ($ENV{'form.uploaddoc.filename'}=~/\.(gif|jpg|png|jpeg)$/i) { - $syllabus{'uploaded.photourl'}= - &Apache::lonnet::userfileupload('uploaddoc'); + if ($syllabus{'uploaded.photourl'}) { + &Apache::lonnet::removeuploadedurl($syllabus{'uploaded.photourl'}); + } + $syllabus{'uploaded.photourl'}= + &Apache::lonnet::userfileupload('uploaddoc',undef,'aboutme'); } $syllabus{'uploaded.lastmodified'}=time; &Apache::lonnet::put('aboutme',\%syllabus,$cdom,$cnum); @@ -129,17 +148,23 @@ ENDDOCUMENT # ---------------------------------------------------------------- Get syllabus if (($syllabus{'uploaded.lastmodified'}) || ($allowed)) { my $lastmod=$syllabus{'uploaded.lastmodified'}; - $lastmod=($lastmod?localtime($lastmod):'never'); - $r->print('Last updated: '.$lastmod); + $lastmod=($lastmod?&Apache::lonlocal::locallocaltime($lastmod):&mt('never')); + $r->print(&mt('Last updated').': '.$lastmod); if ($syllabus{'uploaded.photourl'}) { - $r->print(''); + &Apache::lonnet::allowuploaded('/adm/aboutme', + $syllabus{'uploaded.photourl'}); + if ($target ne 'tex') { + $r->print(''); + } else { + $r->print(&Apache::lonxml::xmlparse($r,'tex','')); + } } if ($allowed) { $r->print( ''); } - $r->print(''); + if ($target ne 'tex') {$r->print('');} else {$r->print('\\\\');} } else { $r->print(''.&mt('No personal information provided').'.
'); } if ($ENV{'request.course.id'}) { if (&Apache::lonnet::allowed('srm',$ENV{'request.course.id'})) { - $r->print('