loncom/interface/lonfeedback.pm - diff

Return to lonfeedback.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.360, 2012/12/17 16:05:59	version 1.362, 2013/01/03 20:41:45
Line 1952 END	Line 1952 END

my %onload = ('onload' => 'window.focus();setposttype();');	my %onload = ('onload' => 'window.focus();setposttype();');
my %parms=('add_entries' => \%onload);	my %parms=('add_entries' => \%onload);
if ($env{'form.modal'} ne 'yes') { 'bread_crumbs' => $brcrum }	if ($env{'form.modal'} ne 'yes') { $parms{'bread_crumbs'} = $brcrum }
my $start_page=	my $start_page=
&Apache::loncommon::start_page('Resource Feedback and Discussion',$js,\%parms);	&Apache::loncommon::start_page('Resource Feedback and Discussion',$js,\%parms);

Line 3992 sub handler {	Line 3992 sub handler {
my $textline = '<b>'.	my $textline = '<b>'.
&mt('Marked "New" posts as read in a total of [_1] resources/bulletin boards.',	&mt('Marked "New" posts as read in a total of [_1] resources/bulletin boards.',
$numitems).	$numitems).
'</b>";	'</b>';
if ($numitems > 0) {	if ($numitems > 0) {
&Apache::lonnet::put('nohist_'.$env{'request.course.id'}.'_discuss',	&Apache::lonnet::put('nohist_'.$env{'request.course.id'}.'_discuss',
\%discinfo,$env{'user.domain'},$env{'user.name'});	\%discinfo,$env{'user.domain'},$env{'user.name'});