loncom/interface/lonmsg.pm - diff

Return to lonmsg.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.97, 2004/04/06 15:56:37	version 1.98, 2004/05/03 19:10:39
Line 911 ENDUPLOAD	Line 911 ENDUPLOAD

sub disfacetoface {	sub disfacetoface {
my ($r,$user,$domain)=@_;	my ($r,$user,$domain)=@_;
	my $target=$ENV{'form.grade_target'};
unless ($ENV{'request.course.id'}) { return; }	unless ($ENV{'request.course.id'}) { return; }
unless (&Apache::lonnet::allowed('srm',$ENV{'request.course.id'})) {	unless (&Apache::lonnet::allowed('srm',$ENV{'request.course.id'})) {
return;	return;
Line 944 $content{'sendername'}.'@'.	Line 945 $content{'sendername'}.'@'.
}	}
# Check to see if there were any messages.	# Check to see if there were any messages.
if ($result eq '') {	if ($result eq '') {
$r->print("<p><b>".&mt("No notes, face-to-face discussion records, or critical messages in this course.")."</b></p>");	if ($target ne 'tex') {
	$r->print("<p><b>".&mt("No notes, face-to-face discussion records, or critical messages in this course.")."</b></p>");
	} else {
	$r->print('\textbf{'.&mt("No notes, face-to-face discussion records, or critical messages in this course.").'}\\\\');
	}
} else {	} else {
$r->print($result);	$r->print($result);
}	}