--- loncom/interface/lonaboutme.pm 2006/09/19 14:02:42 1.55 +++ loncom/interface/lonaboutme.pm 2006/10/23 18:48:46 1.57 @@ -1,7 +1,7 @@ # The LearningOnline Network # "About Me" Personal Information # -# $Id: lonaboutme.pm,v 1.55 2006/09/19 14:02:42 raeburn Exp $ +# $Id: lonaboutme.pm,v 1.57 2006/10/23 18:48:46 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -171,12 +171,12 @@ sub handler { } } if (($allowed) && ($env{'form.storesyl'})) { - foreach (keys %syllabusfields) { - my $field=$env{'form.'.$_}; + foreach my $syl_field (keys(%syllabusfields)) { + my $field=$env{'form.'.$syl_field}; $field=~s/\s+$//s; $field=&Apache::lonfeedback::clear_out_html($field, $env{'user.adv'}); - $syllabus{$_}=$field; + $syllabus{$syl_field}=$field; } $syllabus{'uploaded.lastmodified'}=time; &Apache::lonnet::put('aboutme',\%syllabus,$cdom,$cnum); @@ -209,9 +209,9 @@ sub handler { '