--- loncom/interface/lonsimplepage.pm 2006/08/16 19:40:46 1.47
+++ loncom/interface/lonsimplepage.pm 2006/10/23 18:48:47 1.48
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Simple Page Editor
#
-# $Id: lonsimplepage.pm,v 1.47 2006/08/16 19:40:46 albertel Exp $
+# $Id: lonsimplepage.pm,v 1.48 2006/10/23 18:48:47 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -221,14 +221,14 @@ sub handler {
&Apache::lonnet::put($namespace,\%syllabus,$dom,$crs);
}
if (($allowed) && ($env{'form.storesyl'})) {
- foreach (keys %syllabusfields) {
- my $field=$env{'form.'.$_};
+ foreach my $syl_field (keys(%syllabusfields)) {
+ my $field=$env{'form.'.$syl_field};
chomp($field);
$field=~s/\s+$//s;
$field=~s/^\s+//s;
$field=~s/\
$//s;
$field=&Apache::lonfeedback::clear_out_html($field,1);
- $syllabus{$_}=$field;
+ $syllabus{$syl_field}=$field;
}
$syllabus{'uploaded.lastmodified'}=time;
&Apache::lonnet::put($namespace,\%syllabus,$dom,$crs);
@@ -258,10 +258,10 @@ sub handler {
''.
'