--- loncom/interface/lonaboutme.pm 2004/04/29 17:25:11 1.20
+++ loncom/interface/lonaboutme.pm 2004/05/04 14:34:25 1.24
@@ -1,7 +1,7 @@
# The LearningOnline Network
# "About Me" Personal Information
#
-# $Id: lonaboutme.pm,v 1.20 2004/04/29 17:25:11 albertel Exp $
+# $Id: lonaboutme.pm,v 1.24 2004/05/04 14:34:25 albertel 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); @@ -132,7 +151,6 @@ ENDDOCUMENT $lastmod=($lastmod?&Apache::lonlocal::locallocaltime($lastmod):&mt('never')); $r->print(&mt('Last updated').': '.$lastmod); if ($syllabus{'uploaded.photourl'}) { - &Apache::lonnet::allowuploaded('/adm/aboutme', $syllabus{'uploaded.photourl'}); $r->print(''. - $message.''); + if ($target ne 'tex') { + $r->print('
'. + $message.''); + } else { + $r->print('\\\\\textbf{'.$syllabusfields{$_}.'}\\\\'. + &Apache::lonxml::xmlparse($r,' ',$message).'\\\\'); + } if ($allowed) { $r->print('