--- loncom/interface/lonaboutme.pm 2010/01/30 18:02:27 1.142 +++ loncom/interface/lonaboutme.pm 2010/02/21 06:21:50 1.143 @@ -1,7 +1,7 @@ # The LearningOnline Network # Personal Information Page # -# $Id: lonaboutme.pm,v 1.142 2010/01/30 18:02:27 raeburn Exp $ +# $Id: lonaboutme.pm,v 1.143 2010/02/21 06:21:50 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -327,7 +327,8 @@ sub handler { &Apache::lonnet::removeuploadedurl($syllabus{'uploaded.photourl'}); } $syllabus{'uploaded.photourl'}= - &Apache::lonnet::userphotoupload('uploaddoc','aboutme'); + &Apache::lonnet::userfileupload('uploaddoc',undef,'aboutme', + undef,undef,undef,undef,undef,undef,undef,'400','500'); } $syllabus{'uploaded.lastmodified'}=time; &Apache::lonnet::put('aboutme',\%syllabus,$cdom,$cnum); @@ -356,22 +357,19 @@ sub handler { if ($syllabus{'uploaded.photourl'}) { &Apache::lonnet::allowuploaded('/adm/aboutme',$syllabus{'uploaded.photourl'}); - #This call is to resize all "Personal Information" images in the LonCapa System. When its done, you can remove this line. - &Apache::lonnet::resizeImage(&Apache::lonnet::filelocation('',$syllabus{'uploaded.photourl'})); - #---End Resize--- - $image=qq|Photo of the user|; if ($target eq 'tex') { $image=&Apache::lonxml::xmlparse($r,'tex',$image); } - } if ($allowed) { $r->print( '
'. '

'.&mt('Upload a Photo').'

'. + '

'. + &mt('LON-CAPA will automatically scale your uploaded file so the image will not exceed a width of 400px and a height of 500px.').'

'. ''. ''. ''.