loncom/interface/lonaboutme.pm - diff

Return to lonaboutme.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.20, 2004/04/29 17:25:11	version 1.21, 2004/04/30 23:13:52
Line 108 ENDDOCUMENT	Line 108 ENDDOCUMENT
if (($ENV{'form.uploaddoc.filename'}) &&	if (($ENV{'form.uploaddoc.filename'}) &&
($ENV{'form.storeupl'}) && ($allowed)) {	($ENV{'form.storeupl'}) && ($allowed)) {
if ($ENV{'form.uploaddoc.filename'}=~/\.(gif\|jpg\|png\|jpeg)$/i) {	if ($ENV{'form.uploaddoc.filename'}=~/\.(gif\|jpg\|png\|jpeg)$/i) {
$syllabus{'uploaded.photourl'}=	if ($syllabus{'uploaded.photourl'}) {
&Apache::lonnet::userfileupload('uploaddoc');	&Apache::lonnet::removeuploadedurl($syllabus{'uploaded.photourl'});
	}
	$syllabus{'uploaded.photourl'}=
	&Apache::lonnet::userfileupload('uploaddoc',undef,'aboutme');
}	}
$syllabus{'uploaded.lastmodified'}=time;	$syllabus{'uploaded.lastmodified'}=time;
&Apache::lonnet::put('aboutme',\%syllabus,$cdom,$cnum);	&Apache::lonnet::put('aboutme',\%syllabus,$cdom,$cnum);
Line 132 ENDDOCUMENT	Line 135 ENDDOCUMENT
$lastmod=($lastmod?&Apache::lonlocal::locallocaltime($lastmod):&mt('never'));	$lastmod=($lastmod?&Apache::lonlocal::locallocaltime($lastmod):&mt('never'));
$r->print(&mt('Last updated').': '.$lastmod);	$r->print(&mt('Last updated').': '.$lastmod);
if ($syllabus{'uploaded.photourl'}) {	if ($syllabus{'uploaded.photourl'}) {

&Apache::lonnet::allowuploaded('/adm/aboutme',	&Apache::lonnet::allowuploaded('/adm/aboutme',
$syllabus{'uploaded.photourl'});	$syllabus{'uploaded.photourl'});
$r->print('<img src="'.$syllabus{'uploaded.photourl'}.	$r->print('<img src="'.$syllabus{'uploaded.photourl'}.