loncom/interface/lonmsgdisplay.pm - diff

Return to lonmsgdisplay.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.176, 2014/05/21 19:03:04	version 1.177, 2014/10/26 13:10:38
Line 1900 sub disfacetoface {	Line 1900 sub disfacetoface {
$env{'course.'.$env{'request.course.id'}.'.domain'},	$env{'course.'.$env{'request.course.id'}.'.domain'},
$env{'course.'.$env{'request.course.id'}.'.num'},	$env{'course.'.$env{'request.course.id'}.'.num'},
'%255b'.$user.'%253a'.$domain.'%255d');	'%255b'.$user.'%253a'.$domain.'%255d');
my $result='<div>';	my $result='';
foreach my $key (sort(keys(%records))) {	foreach my $key (sort(keys(%records))) {
my %content=&Apache::lonmsg::unpackagemsg($records{$key});	my %content=&Apache::lonmsg::unpackagemsg($records{$key});
next if ($content{'senderdomain'} eq '');	next if ($content{'senderdomain'} eq '');
Line 1965 $content{'sendername'}.':'.	Line 1965 $content{'sendername'}.':'.
} else {	} else {
$r->print('\textbf{'.&mt('No notes, face-to-face discussion records, critical messages or broadcast messages in this '.$lctype.'.').'}\\\\');	$r->print('\textbf{'.&mt('No notes, face-to-face discussion records, critical messages or broadcast messages in this '.$lctype.'.').'}\\\\');
}	}
} elsif ($target ne 'tex') {	} elsif ($target eq 'tex') {
$r->print($result.'</div>');	$r->print(&Apache::lonxml::xmlparse($r,$target,$result));
} else {	} else {
$r->print(&Apache::lonxml::xmlparse($r, 'tex', $result));	$r->print('<div>'.$result.'</div>');
}	}
}	}

sub general_message {	sub general_message {