--- loncom/interface/lonaboutme.pm 2004/04/29 17:25:11 1.20 +++ loncom/interface/lonaboutme.pm 2004/04/30 23:13:52 1.21 @@ -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.21 2004/04/30 23:13:52 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -108,8 +108,11 @@ ENDDOCUMENT 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 +135,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('