loncom/interface/lonbulletin.pm - diff

Return to lonbulletin.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.66, 2012/12/07 17:15:56	version 1.67, 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::lonnet;	use Apache::lonnet;
use Apache::lontexconvert;	use Apache::lontexconvert;
use Apache::lonfeedback;	use Apache::lonfeedback;
	use Apache::lonhtmlgateway;
use Apache::lonlocal;	use Apache::lonlocal;
use Apache::lonhtmlcommon;	use Apache::lonhtmlcommon;
use HTML::Entities();	use HTML::Entities();
Line 211 sub handler {	Line 212 sub handler {
if (($allowed) && ($env{'form.storesyl'})) {	if (($allowed) && ($env{'form.storesyl'})) {
foreach my $syl_field (keys(%syllabusfields)) {	foreach my $syl_field (keys(%syllabusfields)) {
my $field=$env{'form.'.$syl_field};	my $field=$env{'form.'.$syl_field};
$field=~s/\s+$//s;	chomp($field);
$field=&Apache::lonfeedback::clear_out_html($field,1);	my $gateway = Apache::lonhtmlgateway->new();
	$field = $gateway->process_incoming_html($field,1);
$syllabus{$syl_field}=$field;	$syllabus{$syl_field}=$field;
}	}
$syllabus{'uploaded.lastmodified'}=time;	$syllabus{'uploaded.lastmodified'}=time;