loncom/interface/lonsimplepage.pm - diff

Return to lonsimplepage.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.102, 2013/03/11 02:04:36	version 1.103, 2013/09/17 15:04:30
Line 33 use Apache::Constants qw(:common);	Line 33 use Apache::Constants qw(:common);
use Apache::loncommon;	use Apache::loncommon;
use Apache::lontemplate;	use Apache::lontemplate;
use Apache::lonnet;	use Apache::lonnet;
use Apache::lontexconvert;	use Apache::lonhtmlgateway;
use Apache::lonfeedback;
use Apache::lonlocal;	use Apache::lonlocal;
use Apache::lonprintout;	use Apache::lonprintout;
use Apache::lonxml;	use Apache::lonxml;
Line 259 sub handler {	Line 258 sub handler {
foreach my $syl_field (keys(%syllabusfields)) {	foreach my $syl_field (keys(%syllabusfields)) {
my $field=$env{'form.'.$syl_field};	my $field=$env{'form.'.$syl_field};
chomp($field);	chomp($field);
$field=~s/\s+$//s;	my $gateway = Apache::lonhtmlgateway->new();
$field=~s/^\s+//s;	$field = $gateway->process_incoming_html($field,1);
$field=~s/\<br\s\/\>$//s;
$field=&Apache::lonfeedback::clear_out_html($field,1);
$syllabus{$syl_field}=$field;	$syllabus{$syl_field}=$field;
}	}
$syllabus{'uploaded.lastmodified'}=time;	$syllabus{'uploaded.lastmodified'}=time;