loncom/interface/lonsyllabus.pm - diff

Return to lonsyllabus.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.57, 2007/03/02 23:17:58	version 1.59, 2007/05/02 01:33:49
Line 120 sub handler {	Line 120 sub handler {
$env{'form.register'},});	$env{'form.register'},});

$r->print($start_page.'<h1>'.$courseenv{'description'}.'</h1><h3>'.	$r->print($start_page.'<h1>'.$courseenv{'description'}.'</h1><h3>'.
$Apache::lonnet::domaindescription{$cdom}.'</h3>');	&Apache::lonnet::domain($cdom,'description').'</h3>');
} else {	} else {
$r->print('\noindent{\large\textbf{'.$courseenv{'description'}.'}}\\\\\\\\\textbf{'.	$r->print('\noindent{\large\textbf{'.$courseenv{'description'}.'}}\\\\\\\\\textbf{'.
$Apache::lonnet::domaindescription{$cdom}.'}\\\\');	&Apache::lonnet::domain($cdom,'description').'}\\\\');
}	}
# -------------------------------------------------------------- Announcements?	# -------------------------------------------------------------- Announcements?
my $day = &Apache::lonannounce::showday(time,2,	my $day = &Apache::lonannounce::showday(time,2,
Line 324 sub handler {	Line 324 sub handler {
if ($allowed) {	if ($allowed) {
$r->print('<br /><textarea cols="80" rows="12" name="'.$field.'" id="'.$field.'">'.	$r->print('<br /><textarea cols="80" rows="12" name="'.$field.'" id="'.$field.'">'.
&HTML::Entities::encode($syllabus{$field},'"&<>').	&HTML::Entities::encode($syllabus{$field},'"&<>').
'</textarea> <input type="submit" name="storesyl" value="Store" />');	'</textarea> <input type="submit" name="storesyl" value="Save" />');
}	}
}	}
}	}